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Preface to the 2nd Edition 


The Hewlett-Packard HP 48SX calculator was introduced in March, 
1990 to an enthusiastic reception by students and engineers around the 
world. In April 1991 a second model, the HP 48S, was introduced at a 
lower cost, making the power of the HP 48 family available to a wider 
audience. 


In June 1993 Hewlett-Packard announced a major upgrade to both 
models of the HP 48, extending the built-in command set and providing 
new organization to the most used tasks with focused user interfaces. 
Along with the new software, the HP 48GX has 128K of random access 
memory (up from 32K), while the HP 48G remains at 32K. 


The HP 48 Handbook has been used by many HP 48 owners to provide 
a reference to the calculator and to the HP 82211 HP Solve Equation 
Library Card. This new edition of the Handbook has been designed to 
serve owners of both the original and new models of the HP 48 family. 
HP 48 fans who are upgrading from the original model to the new 
model will notice that in addition to the new functions and user 
interfaces, certain areas, such as memory organization, are somewhat 
different. Compatibility issues between new and old models are 
discussed, and many ideas are provided to help you get the most out of 
your new machine. The Example Programs and System Programming 
chapters are new, and provide exciting new programs and tools to use. 
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Introduction 


The HP 48 Handbook is designed with the programmer in mind — a 
concise combination of system descriptions and detailed reference 
information. Many example programs are provided to help you along 
and to stimulate your imagination. A chapter is devoted to System 
Programming, which opens a door into the world “under the hood” of 
the HP 48. The Command Reference is your encyclopedic reference to 
all commands. 


Fundamental Concepts. The HP 48 world revolves around the 
stack, which is implemented as a dynamically allocated last-in-first-out 
(LIFO) structure which can hold any number of objects of different 
sizes and types (see Objects, Names, and Constants). All commands 
take their (zero or more) arguments from the stack and return any 
results to the stack. For instance, consider the following display: 


POVER | ROT | ROLL [ROLLG] Pick [DEPTH 





Level 1 contains the number 2.47, level 2 the algebraic expression 
‘57+X’, level 3 the complex number (3,4), and level 4 the string 
“Janet”. Now execute the multiply function. While multiply is 
executing, the arguments are removed from levels 1 and 2, leaving (3,4) 
in level 2, and the string “Janet” in level 3. When the multiplication is 
complete the result is returned to the top of the stack: 


"Janet" 


(3,4) 
'Cartae2. te! 
boven | kor [ROLL ROLL Pick [DEPTH 
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Many commands are type-sensitive, that is, they perform different 
operations for different types of input parameters. For the complete 
descriptions for each command, see Command Reference. 


Example Programs. There are several example programs and 
program fragments in this book. Each complete program is named and 
printed with a size and checksum. 


All characters in the programs are case-sensitive. The names of 
commands are always uppercase. By convention, the names of global 
variables are uppercase, and of local variables are lowercase. If another 
example program is used in an example, the name will be shown in 
bold characters. 


Verifying Example Programs. While the command line entry of a 
program may be free form, with the [e] keystroke being valid between 
words, graphics objects must be entered exactly as shown, with no 
extra breaks in the command line when entering the data. 


If you enter a program into the HP 48, use the BYTES function to make 
sure the program in the calculator matches the version in the book. 


Computing Checksums. To compute a checksum for a named 
program, enter the program and store it in a variable with the same 
name that’s in the example. Then, place the name (such as “VSCAN’) 
on the stack and execute BYTES. The size (including the name) and 
checksum will be returned to the stack. 


To compute a checksum for a program fragment, place a copy of the 
fragment in level 1 and execute BYTES. 


For instance, the program 


* DROP SWAP * 


is 15 bytes long and has the checksum #5197h. 
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Objects, Names, and Constants 


Object is a general term for anything that can be put on the stack or 
stored in a variable. Any object may be described in terms of its type 
and value. For instance the number 247 has type “real number’ with 
value 247. 


Objects may be classified into several broad categories: 


¢ A data object contains information, such as a number or a 
sequence of characters. Real numbers, complex numbers, binary 
integers, arrays, and strings are examples of data objects. 


© A procedure object is a collection of objects that perform a task in 
order. Programs and algebraic expressions are procedure objects, 
and may be evaluated, placed on the stack or stored in variables 
just like any other object. 


¢ Aname object permits an object to be referenced by name. 


© Global names refer to corresponding variables that are 
available at any time. By convention, global variable names 
are written in uppercase (A). 


¢ Local names refer to corresponding local variables that exist 
only within the scope of the executing program that defines 
them. By convention, local variable names are written in 
lowercase (a). 


In general, objects may be stored in variables or manipulated on the 
stack regardless of their type. Some HP 48 functions and commands 
perform different operations based on the type of object supplied as a 
parameter. For instance, the + function executes differently for strings 
(concatenates) than for real numbers (adds). 


Objects, Names, and Constants 3 


Object Types 

Different object types are distinguished in the stack display through 
their delimiters — characters that are unique to that type of object. For 
instance, strings are surrounded by quote marks ("), and programs are 
contained in French quotes (**). 


Real number 
Complex number 
String 

Real array 
Complex array 
List 

Global name 
Local name 
Program 
Algebraic 
Binary integer 
Graphics object 
Tagged object 


Unit object 
XLIB name 


Directory 

Library 

Backup object 
Built-in function 
Built-in command 
Internal binary integer 
Extended real number 
Extended complex no. 
Linked array 
Character object 
Code object 

Library data 

External objects 


1.2345 
(2.334.595) 
"ABC" 

123] 

C132) €3,4) ] 


Graphic 131 x 64 
Dist: 34.45 
32_ft/s*2 

XLIB 766 1 

DIR ... END 
Library T66: ... 
Backup HOMEDIR 
SIN 

SWAP 

<247d> 

Long Real 

Long Complex 
Linked Array 
Character 

Code 

Library Data 
External 





Some objects may only be manipulated by unnamed internal system 
objects (see System Programming). 
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Real and Complex Numbers 


Real Numbers. Real numbers have a 12-digit mantissa between 1 
and 9.99999999999 and a 3-digit exponent between —499 and +499. 
During math operations, real numbers are expanded to have a 15-digit 
mantissa and a 5-digit exponent during the calculation, then rounded 
back to the 12-digit value when returned as results. 


Complex Numbers. Complex numbers are represented by pairs of 
real numbers in parentheses: (2,3) (1.2,5). The Rectangular (x,y) and 
Polar (1,0) display modes (flags —15 and —16) control the appearance of 
a complex number on the stack, but do not affect the internal form. For 
instance (2,3) is displayed in polar form as (3.60555127546, 
£56.309932474), but it is still stored internally as (2,3). 


Vectors and Matrices. Vectors and matrices may be composed of 
either real or complex numbers. Some examples: 


Ci2] Real vector 


Real matrix 
Complex matrix 


Related Commands: The commands R->C and C->R convert 
between real and complex numbers or real and complex arrays. CR, 
V—, and OBJ— decompose a complex number to its real and 
imaginary parts. C—>R separates a complex array into an array of real 
components and an array of imaginary components. OBJ— separates a 
complex array into a series of complex numbers followed by a list 
containing the dimensions of the original array. If Complex Mode (flag 
—19) is set, V2 creates a complex number instead of a two element 
array. RE returns the real component of a number or array; IM returns 
the imaginary component. ARG returns the polar angle 0 of a 
coordinate pair (x,y). SIGN returns a unit vector in the direction of the 
input argument (x,y). 
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Binary Integers 

Binary integers are entered and displayed with a leading # delimiter 
and a trailing b, d,h, oro to indicate the base. The trailing character 
can be omitted if the HP 48 is already set to the desired base mode. 


Examples: #161161b #247d #7DAChK 


The commands STWS and RCWS may be used to store or recall the 
wordsize, which may be up to 64 bits. The wordsize controls the 
interpretation of arguments and the results of arithmetic operations. For 
instance, if a binary integer is added to a real number, the real number 
is truncated to the current wordsize, and the result is a binary integer 
truncated to the current wordsize. 


Note that changing the wordsize alone does not affect a binary integer — 
you cannot truncate a binary integer merely by changing and restoring 
the word size. 


Binary Operators. The operators AND, OR, XOR, and NOT are 


available for logical comparisons. The bit-by-bit comparisons are 
performed up to the current wordsize according to the following table: 


TRUTH TABLE 


arg} arg} arg) 
arg arg AND OR XOR 
args args 





1 1 1 
1 0 1 
0 1 1 
0 0 0 


Related Commands: The following commands are useful for 
working with binary integers: B>R, RCWS, RL, RLB, RR, RRB, 
R-B, SL, SLB, SR, SRB, and STWS. 
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Unit Objects 

Unit objects are entered and displayed in the form: number_units where 
number is a real number and units is an algebraic expression containing 
unit names, prefixes, exponents and the operators ¥,~, and“. (A unit 
object may only contain one /“ operator.) 


Examples: 
3e2_ft7s*2 


Density: 25_9/cm*3 


Units in Menus. Unit objects in built-in menus or custom menus 
provide three types of functionality: 


¢ Primary keys append the unit on the key to the numerator of the 
level 1 object. 


° — Left-shifted keys convert the level 1 object to the unit on the key. 


¢ Right-shifted keys append the unit on the key to the denominator 
of the level 1 object. 


User-Defined Units. A user-defined unit may be created from any 
combination of the built-in units or other user-defined units. To create 
a user-defined unit, store the definition in a variable whose name is the 
name of the new unit. 


For example, create the user-defined unit week by storing 7_d in the 
variable week. Executing UBASE on 2_week yields 1209600_s. The 
object 1_week stored in a custom menu will now behave like any other 
unit-related menu key. 


Related Commands: The following commands are useful for 


working with unit objects: CONVERT, OBJ->, UBASE, UFACT, 
UNIT, and UVAL. 
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Backup Objects 

Backup objects are used to store backed-up data in independent 
memory (ports 1 through 33 for the HP 48G/GX, or ports 1 or 2 for the 
HP 48S/SX) or in port 0. A backup object may contain any object, 
including directory structures. 


Backup Identifiers. The contents of a backup object are referenced 
by a backup identifier (eg: 1 FRED), which is a port-tagged name. 


The wildcard & may be used for the port number for the commands 
RCL, EVAL, and PURGE. When the wildcard is evaluated, memory is 
searched in the order of ports 2, 1, 0, and then main memory for the 
first occurrence of the specified name. 


If a backup object contains a directory structure, an object within that 
directory structure may be recalled or evaluated by specifying the path 
and name of the object in a port-tagged list. 


For instance, ?12£ EEDIR FRED 3} refers to the object FRED ina 
directory stored in backup object EEDIR in port 1. 


Creating Backup Objects. A backup object is created by executing 
the STO command with the object in level 2, and the port-tagged name 
in level 1. For instance, the sequence 'FRED' RCL #1:BFRED STO 
recalls the contents of variable FRED to the stack and creates a backup 
object called BFRED in port 1. 


Recalling Backup Objects. The contents of a backup object may 
be recalled in two ways: 


© Press (PYLIBRARY), FOR TO, FORTI,or FORT, then (p) and 
the menu key for the backup object. 


¢ Place the backup identifier on the stack and execute RCL. 
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Evaluating Backup Objects. The contents of a backup object may 
be evaluated two ways: 


° Press (P)LIBRARY), FOR TO, FORTI,or FORT for the port 
number, then the menu key for the backup object. 


¢ Place the backup identifier on the stack and execute EVAL. EVAL 
also accepts a list of backup identifiers. 


Purging Backup Objects. To purge a backup object, place the 
backup identifier on the stack and execute PURGE. A backup 
identifier may be included in a list supplied to PURGE. 


Related Commands: PVARS takes a port number as its argument 
and returns two results: 


¢ Level 2 contains a list of backup objects and library IDs. 


¢ Level 1 contains the type of memory in the port - "SYSRAM", 
"ROM", or a number showing the amount of available independent 
RAM. 


Library Objects 

Library objects are collections of one or more objects that generally 
extend the built-in command set. Libraries are referenced by a library# 
or a library identifier (* port#! library#), depending on the command. 
On the HP 48S/SX the title of the library may be displayed by pressing 
(4) in the LIBRARY menu. 


Installing a Library. Library objects only extend the command set 
when they are stored in a port (0, 1, or 2) and attached to a directory in 
user memory. 
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To use a library, perform the following: 


¢ Store the library object in a port, such as port 0. For instance, if the 
library object is in level 1 of the stack, execute 0 STO. 


¢ Turn the calculator off, then on again. The calculator will perform 
a system halt, which updates the system configuration to recognize 
the new library. 


° Attach the library to the desired directory. 


¢ To attach a library to the current directory, enter the library# 
and execute ATTACH. 


¢ To detach a library from the current directory, enter the 
library# and execute DETACH. 


Note: Most commercially produced libraries will automatically attach 
to the HOME directory. Any number of libraries may be attached to 
HOME, but only one library may be attached to each subdirectory. 


Removing a Library. To purge a library, perform the following: 


¢ Ensure that the library object does not appear on the stack as 
Library nnn: ... Either store the library in a variable or 
execute NEWOB to create a unique copy. 


® Change to the directory to which the library is attached. 
© Enter the library#, such as 2! 272 and execute DETACH. 


¢ Enter the library ID, such as § 2! 272 and execute PURGE. 


Note: When you detach a library, programs that use commands or 
functions in that library will now read XLIB nnn mmm when displayed 
on the stack. You cannot enter a library command into a program in 
the form XLIB nnn mmn, so you can no longer edit the program. 
When the program is executed, missing library commands generate the 
error “Undefined XLIB Name”. 
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Object Sizes 

The following table lists the typical sizes for selected object types. 
Note that the HP 48 saves temporary memory by using built-in objects 
for some common values. The most commonly used built-in objects 
are the real integers from —9 to +9, the complex constant (0,1), the real 
constants (e, 7, MINR, and MAXR), and many internal binary integers. 
When a built-in object is used, only 2.5 bytes are used. For instance, 
the real number 9 is built into the HP 48, so when you enter 9 and 
execute BYTES, only 2.5 bytes are used to store a pointer to the built- 
in number, whereas 10.5 bytes are required to store the number 2.47. 


Type] Object Size (bytes) 


Real number 
Complex number 
String 
Real array 
Complex array 
List 
Unquoted name 
Quoted name 
Program 
Algebraic 
Binary integer 
Graphics object 
Tagged object 
Unit object 
Real magnitude 
Prefixes 
Unit names 
Operators (*, /, or “) 
Exponents 
XLIB name 
Directory 
Backup object 
Function or command 
Internal binary integer 
Extended real number 
Extended complex no. 
Character object 
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10.5 
18.5 
5 + number_of_characters 
12.5 + 8 * number_of_elements 
12.5 + 16 * number_of_elements 
5 + size_of_included_objects 
3.5 + number_of_characters 
8.5 + number_of_characters 
12.5 + size_of_included_objects 
5 + size_of_included_objects 
13 
10 + rows * CEIL(cols/8) 
3.5 + tag_characters + object_size 
75+ 
10.5 (2.5 if built-in) 
6 
5 + number_of_characters 
2.5 
10.5 (2.5 if built-in) 
5.5 
6.5 + size_of_included_objects 
5 + no._of_name_chrs + incl._obj 
2.5 
5 
13 
23:5 
3.5 





Object Evaluation 

Evaluation of an object may be either implicit or explicit. Objects 
being entered on the command line, such as a real number or the name 
of a command such as +, are implicitly evaluated unless surrounding 
delimiters delay evaluation. An object on the stack may be explicitly 
evaluated by executing EVAL. 


Evaluation results vary with the type of object: 
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When a global variable name is evaluated, the contents of the 
variable are evaluated. To place a global variable name on the 
stack, enclose it in tick marks ('%' ). 


When a local variable name is evaluated, the contents of the local 
variable are recalled to the stack, but not evaluated. If a local 
variable contains a real number, the behavior is essentially the 
same as for a global variable, but if the local variable contains a 
program, the program will only be recalled to the stack. You can 
use a subsequent EVAL to evaluate the program. 


When a program is evaluated, global names are evaluated unless 
surrounded by ticks ('), the contents of local names are recalled to 
the stack, commands are executed, and all other objects are put on 
the stack. 


When an algebraic object is evaluated, the value it represents is 
computed and returned to the stack. Algebraic objects being 
evaluated obey rules of precedence — see the table on the next 


page. 
When a list is evaluated, global names are evaluated, programs are 
evaluated, commands are executed, and all other objects are placed 


on the stack. 


All other objects are placed on the stack. 
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Operator Precedence 

Operator precedence controls the order in which calculations take place 
within an algebraic expression. Functions with the highest precedence 
(1) are evaluated before those with the lowest precedence (11). The 
evaluation order is left-to-right for operators having the same 
precedence. For instance, in the expression '3+5#7', the multiply 
operation takes precedence over the add, resulting in the answer 38, 
whereas the answer would be 56 if evaluated from left to right without 
following the rules of precedence. 


1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 


Expressions within parentheses 

Functions 

! (Factorial) 

Power (™) and square root (I) 

Negate (—) multiply(*) divide (“) 

Add (+) and subtract (—) 

Relational operators (==; #; <3 >; 43 >) 
AND and NOT 

OR and XOR 


Left argument for | (where) 
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Variable Names 

Variable names may contain letters, digits, and most characters. Names 
may not start with a digit, match a command name, or contain object 
delimiters or the characters+ - ¥7* f=<¢>4EB 487 ! 
space, comma, or @. Variable names that begin with ¢ are interpreted 
as local variables (see Local Variables). 


Reserved Variables. The HP 48 stores information for various 
commands in reserved variables. Reserved variables may reside in any 
directory, and may be used in more than one directory at a time. 


[Name[ Description _—~sd 
ALRMDAT Current alarm editing data 
CST Custom menu contents 
EQ Current equation for SOLVE and PLOT 
EXPR Current expression for symbolic operations 
IERR Uncertainty of integration 
IOPAR I/O parameters (HOME directory only) 
MHpar Saves the state of the Minehunt game 
Mpar Multiple Equation Solver equation set 
Nmines Specifies the number of Minehunt mines 
PICT References the graphics display 
PPAR PLOT parameters 
PRTPAR PRINT parameters (HOME directory only) 
VPAR 3D PLOT view volume parameters 
ZPAR Stores a copy of PPAR from previous zoom 
der... User-defined derivatives begin with der 
nl, n2, ... Integers created by ISOL 
SI, 82, ... Signs created by ISOL and QUAD 
DAT Current statistical matrix 
PAR Statistics parameters 
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Notes: 


¢ The I/O setup commands only modify the copy of JOPAR in the 
HOME directory. 


¢ The print commands only modify the copy of PRTPAR in the 
HOME directory. 


¢ PICT is not directory-dependent. It only refers to graphics display 
memory. 


¢ With the exception of PICT, you can store any object into a 
reserved variable, but the subsequent execution of commands that 
depend on that reserved variable may be unpredictable or generate 
an error. 


¢ You may purge a reserved variable to save memory. 


Symbolic Constants 
The HP 48 has five constants which may be used in symbolic form or 
as approximate numerical values. 


| Name | Machine Value 
3.14159265359 
2.71828182846 


(0,1) 
9.99999999999E499 
1.E-499 





System flags —2 and —3 control evaluation of symbolic constants: 


i ee eee 


Symbolic Constants Symbolic Numeric 


form form 


Numeric Results Symbolic Numeric 
results results 
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Memory 


Memory in HP 48 calculators is accessed in four-bit quantities (nibbles, 
or 1/2 bytes) within a 20-bit address space, yielding a 512K byte 
address space. The BYTES command, which returns the size and a 
checksum for an object, will sometimes show a size such as 106.5, 
reflecting that the object occupies 213 nibbles of memory. 


The HP 48SX and the HP 48GX have two ports which may accomodate 
plug-in cards containing either random-access memory (RAM) or read- 
only memory (ROM). The rest of this chapter is devoted to a 
discussion of system memory organization and possible uses of plug-in 
cards. 


Memory Organization 
Memory in the HP 48 is organized as follows: 


System ROM _ The operating system resides in 512K bytes (256K in 
the HP 48S/SX) of read only memory (ROM). This 
command set may be extended through the use of 
library objects which reside in ROM or RAM (see 
Library Objects). Walf of this memory may be 
layered with system RAM. 


System RAM There are 32K bytes of random access memory 
(RAM) in the HP 48S, HP 48SX, and the HP 48G. 
There are 128K bytes of RAM in the HP 48GX. 
Some memory is reserved for display memory and 
temporary memory. 


Plug-in ROM Plug-in ROM application cards, available from a 
number of manufacturers, may extend the built-in 
command set. 


Plug-in RAM HP 48SX or HP 48GX RAM may be extended by 
adding plug-in RAM cards that contain either 32K 
(HP 82214A) or 128K (HP 82215A). Plug-in RAM 
may be configured two ways (see Configuring RAM 
Cards). 
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User Memory 

User memory may be organized into a tree structure of directory 
objects, which are implemented as variables stored in the HOME 
directory. 


HOME 


X Y PROGS IOPAR EQNS _ DATA 


Too 


PROG1 PROG2 PAGES PS PROG1 


Pt P2 


The status line displays the current directory path, and the VAR menu 
displays the current directory: 


AD 
HOME PROGS PAGES } 


k 
t 
4 
cS! 
2 
1 


E 





In the example above, the current directory is PAGES, which contains 
variables P1 and P2. 
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Creating a Directory. A directory may be created with the 
command CRDIR. To store variables in the new directory move to the 
new directory by evaluating its name or pressing the corresponding key 
in the VAR menu. 


Accessing Variables. When a variable name is evaluated, the 
current directory is searched first. If the variable is not found, its parent 
directories are searched in ascending order until the variable is found. 
In the example above, there are two variables named PROGI. 
Different directories may have variables of the same name. 


Changing Directories. To change to a lower directory, simply 
evaluate its name. To return to the previous level, execute UPDIR (see 
Menu Traversal Program). Evaluating a list that starts with HOME 
followed by directory names can quickly change the current directory 
to any other place in user memory. For instance, if the current directory 
is PAGES, evaluating { HOME EQNS } will change the current 
directory to EQNS. A port-tagged path may be used for RCL and 
EVAL, but you must move to the target directory for STO. 


Changing a Directory Name. To change the name of a directory or 
move the directory to another location, perform the following steps: 


¢® Recall the directory to the stack 
¢ Purge the old directory 
¢ Move to the new location 


© Enter the new name and execute STO. 


Purging a Directory. The PURGE and PGDIR commands may be 
used to purge a directory. The PURGE command only removes empty 
directories; PGDIR removes a directory and its contents. 


Saving User Memory. The commands ARCHIVE and RESTORE 


may be used to save and recover all of user memory (see Data 
Transfer). 
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Temporary Memory 

The data stack in the HP 48 is actually a stack of pointers which refer to 
objects elsewhere in memory. Temporary memory is the calculator’s 
“scratchpad”. All objects that are not stored in a port or in a user 
variable reside in temporary memory. Many commands require 
temporary memory to construct intermediate objects or new objects 
returned as results to the stack. 


High Memory 


Data Stack 


Y 


Available Memory 


t 


Return Stack 


TEMPORARY MEMORY 
(TEMPOB) 


PICT Grob 


Stack Display Grob 
SoftKey Grob 
Dedicated System RAM 


Low Memory 
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Use of Temporary Memory. To understand temporary memory a 
little more, consider what happens when two math operations are 
performed. Enter the numbers 1.5 and 2.6 on the stack. These numbers 
now reside in temporary memory, referred to by pointers on the data 
stack. When the numbers are added, the result, 4.1, is a number in 
temporary memory referenced by a pointer in level 1 of the data stack. 
The objects 1.5 and 2.6 remain in temporary memory, referenced by 
pointers that save the Last Arguments. 


Now add 2.8 to the result in level 1. The level 1 pointer on the data 
stack refers to the object 6.9 in temporary memory. The last arguments 
pointers now refer to the objects 2.8 and 4.1, and the objects 1.5 and 2.6 
are no longer referenced. 


Garbage Collection. From time to time the HP 48 will “hesitate” 
during an operation. This hesitation is usually caused by the removal 
of objects in temporary memory which are no longer being used. 
Objects which are no longer referenced continue to accumulate in 
temporary memory until memory has been filled. When memory is 
full, the calculator scans the objects in temporary memory, deleting 
those without references to them. This process, known as “garbage 
collection”, is similar in concept to garbage collection in LISP. 


A large number of pointers on the stack that point to temporary 
memory can slow down the garbage collection process to an 
uncomfortable degree. This occurs when there are a large number of 
objects on the stack, or an object has been extracted from a large list. A 
worst case scenario occurs when a list that has been stored in a local 
variable has been broken out onto the stack using OBJ—. In this case, 
the time required for garbage collection increases roughly with the 
square of the number of objects that were in the list. List operations 
can be optimized by storing the lists in global variables, effectively 
moving the operations from temporary memory to user memory. 


The MEM command returns the amount of available memory, forcing 
an initial garbage collection to return an accurate result. It may be 
helpful to insert the sequence MEM DROP to force garbage collection 
prior to speed-sensitive program sequences. 
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The NEWOB Command. The command NEWOB may be used to 
create a new copy of an object in temporary memory, whose only 
reference is on the data stack. In general, the system will perform an 
automatic NEWOB where it makes sense. For instance, if you recall 
the contents of a variable to the stack and press (EDI), the object will be 
copied to temporary memory before editing begins. 


There are two uses for NEWOB: 


¢ NEWOB “frees” an object that was extracted from a list. Consider 
the following program: 


« € "AB" "CD" "EF" > 2 GET » 


Level 1 of the data stack contains a pointer into the list, which still 
resides in temporary memory. Executing NEWOB now would 
create the unique object “CD” in temporary memory, and release 
the list for garbage collection. Note: set the Last Arguments flag 
(-55) to prevent the list from being referenced as a last argument. 


¢* Recalling an object to the stack simply returns a pointer to the data 
stack. To purge a backup object from a port while retaining a copy 
in temporary memory, recall the object and execute NEWOB. 
Then the original object may be purged because there are no 
references to it. 
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Configuring RAM Cards 


Initial Configurations. Before a plug-in RAM card is used, some 
consideration should be given to its intended use. RAM cards may be 
configured two ways: 


© Independent RAM may be thought of as an “electronic disk”, 
which may be removed from the calculator. Individual objects or 
entire directories may be placed in independent RAM (see Backup 
Objects for more details). This configuration is most suitable for 
backing up data, “hiding” data from the HOME directory, or 
exchanging data with another calculator. 


System RAM (128k) 
Port 1 (128K) 


Port 2 


4Mb in 32 
128K Banks 





System ROM (256K) System ROM (256K) 


Higher Addresses —————————_ > 
HP 48GX Memory Organization (Port 1 Independent) 


Independent RAM cards in port 2 may contain up to 32 banks of 
128K bytes, each of which becomes a logical port. When 
installing a large RAM card into port 2, the command PINIT is 
useful for initializing all the banks at once. 


NOTE: Some objects, such as user programs which use new 


HP 48G/GX commands will not work properly when read into a 
HP 48S/SX. 
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¢ Merged RAM extends the built-in RAM, creating more room for 
variables and directories, port 0, temporary objects, or graphics 
display area. In the HP 48SX, a card used for merged RAM may 
be installed in either port 1 or port 2. In the HP 48GX, merged 
RAM can only be installed in port 1. 


System RAM (256K) 


Port 2 
4Mb in 32 


128K Banks 





System ROM (256K) System ROM (256K) 


Higher Addresses ——————————_ 
HP 48GX Memory Organization (Port 1 Merged) 


Merged RAM may not be removed from the calculator unless the 
FREE1 command is used to free it. To free a card, make sure there 
is enough available memory to hold all your variables (including 
the contents of port 0), enter a blank list in level 2 and execute 
FREE1. 


Changing Configurations. A merged RAM card may also be 
“converted” to an independent RAM card containing objects that were 
in port 0. To do this, enter a list containing the objects to transfer to 
independent RAM and execute FREE1. 


The reverse operation is also possible. An independent RAM card may 
be converted into merged RAM with the MERGE] command. Any 
objects that were in the card will appear in port 0. 


Understanding Port 0. Port 0 is a portion of built-in memory 
(which may include merged RAM) which behaves in the same manner 
as an independent RAM card (except that it is not removable). Port 0 
may contain either library or backup objects. The amount of memory 
devoted to port 0 changes as objects are stored in it or purged from it. 
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Graphics 


The HP 48 display is a 131x64 pixel LCD which may present either the 
stack display or PICT, a portion of memory set aside for graphic 
displays. To switch the LCD between the stack display and PICT, use 
the commands PICTURE, PVIEW (to display PICT), and TEXT (to 
show the stack display). 


Graphics objects (often known as grobs) may be placed into either 
PICT or the stack display, however the latter operation requires 
commands described in System Programming. 


The size of PICT must be at least 131x64 pixels (1098 bytes), and no 
wider than 2048 pixels. PICT can be enlarged using the PDIM 
command. PICT may also be removed from memory with the PURGE 
command to make space available for memory-intensive applications 
that do not need the graphics display. If P/CT does not exist when a 
command refers to it, a default size PJCT will be created before the 
command is executed. 


Graphics Coordinates 

Two systems of coordinates may be used to manipulate P/CT and 
graphics objects: user-unit coordinates and pixel coordinates. The 
reserved variable PPAR (which may reside in any directory) stores 
scaling information and parameters which pertain to plotting. The full 
definition of PPAR is given later in this chapter. 


The 3D plot types use an abstract space called a view volume to 
visualize functions of two variables. The view volume is described 
later along with the reserved variable VPAR, which stores the 
parameters of the view volume. 
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User Unit Coordinates. User units, represented as complex 
numbers, are typically used to define the boundaries of plots. User unit 
scaling information is stored in the reserved variable PPAR. The first 
two entries in PPAR store the coordinates of the lower-left corner and 
upper-right corner of PICT. The default plot boundaries are (-6.5,—3.1) 
and (6.5,3.2). 


(-6.5,3.2) Default User Coordinates (6.5,3.2) 


(0,0) 


(-6.5,-3.1) (6.5,-3.1) 


Pixel Coordinates. Pixel coordinates are represented by a list 
containing two binary integers, { #col #row }. Graphics objects on the 
stack may only be described with pixel coordinates. The upper-left 
pixel of PICT or any graphics object is represented by { #0 #0 }. 


{ #0 #0 Jy Pixel Coordinates { #130 #0} 





GOR Coordinate 


{ #0 #63 } O { #130 #63 } 


Related Commands: The commands C->PX and PX->C convert 
between user-unit and pixel coordinates based on the dimensions in 
PPAR. The PDIM command changes the size of PICT. PMIN and 
PMAX set the coordinates of the plot in user units, and SCALE 
specifies the x and y scale in units per 10 pixels. Other commands that 
affect scaling are AUTO, AXES, DEPND, INDEP, +H, and «W. 
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Graphics Operations 
The commands GOR, GXOR, and REPL may be used to superimpose 
one graphics object onto another. GOR performs a logical OR for each 
pixel. GXOR performs an exclusive OR (useful for cursors or 
animation applications). REPL replaces the destination grob’s pixels 
with those from the new grob. 


The syntax for these commands is: 


Level3 Level2 Level1 —-> Level 1 
{ #x #y } groby 


(x,y ) grob2 
{ #x #y } grob 
(x,y) grob 





The level 3 argument is the destination (or target) grob. The upper left 
corner of groby will be positioned on grob, at the location specified in 
level 2. If the coordinate is specified in user-units the current scaling 
values in the variable PPAR will be used. If no copy of PPAR is found 
in the current directory, a new PPAR will be created with the default 
settings (see PPAR). 


If the destination grob is anything other than PICT, the new grob will 
be returned to the stack. If the destination is PICT, no copy is returned. 
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Truncation. If grobz extends beyond the boundary of the destination 
grob it will be truncated, leaving the size of the destination grob 
unchanged. 







Destination Grob 





GOR, GXOR, REPL 
Coordinate. 


Drawing Lines. The commands LINE and TLINE are available for 
drawing lines in PICT. LINE sets the pixels in a line between two 
given coordinates; TLINE toggles the state of the pixels in a line 
between two coordinates. 


Example: The program GREX illustrates the differences between 
GOR, GXOR, and REPL, as well as between LINE and TLINE. The 
program begins by defining a grob showing a small cross within a box. 
For each command REPL, GOR, and GXOR, the cross is drawn on 
black pixels and white pixels, then the inverted cross is drawn on black 
and white pixels below. Then the commands LINE and TLINE are 
used to draw two lines through a box. 


TLIME 
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GREX 1612.5 Bytes Checksum #DAODh 


x 


GROB 9 9 FF16161611161116D716111611161616FF1i6 
PICT RCL + cross pictsav 


& 


PICT PURGE (#6 #6 3 PYIEW 
#19d #19d BLANK NEG 


PICT ¢ 


PICT ¢ 


#7d #1id 3 3 PICK REPL 

#49d #id 3 3 PICK REPL 

#93d #1d 3 3 PICK REPL 

#7d #27d 3 3 PICK REPL 

#49d #27d 3 3 PICK REPL 

#93d #27d > 3 ROLL REPL 

#12d #6d 3 cross REPL 

#12d #32d 3 cross NEG REPL 

#18d #21d 3 "REPL" 1 3GROB REPL 
#28d #6d 3 cross REPL 

#28d #32d 3 cross NEG REPL 

#54d #6d 3 cross GOR 

#54d #32d 3 cross NEG GOR 

#61d #21d 3 "GOR" 1 +GROB REPL 
#76d #6d } cross GOR 

#7Od #32d 3 cross NEG GOR 

#98d #6d 3 cross GXOR 

#98d #32d 3 cross NEG GXOR 
#103d #21d 3 "GOR" 1 +GROB REPL 
#114d #6d 3 cross GXOR 

#114d #32d 3 cross NEG GXOR 
#49d #51d 3} DUP2 

#63d 3 SUB NEG REPL 

#53d 3 ¢ #77d #53d 3 LINE 

#66d 3 {< #77d #66d + TLINE 

#79d #51id + "LINE" 1 +GROB REPL 
#79d #58d 3 "TLINE" 1 +GROB REPL 


{ #6d #48d 3 ¢ #136d #48d 3 LINE 


{ #43d 
{ #85d 


#6d + € #43d #48d 3 LINE 
#6d 3+ € #85d #48d 3 LINE 


{ 3 P¥IEW pictsay PICT STO 


* 
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Converting Text to Graphics 

The command —GROB is used to create a graphic representation of 
any object. —>GROB takes an object in level 2 and a font size 
expressed as a real number in level 1. The font number may be 0, 1, 2, 
or 3. There are three font sizes in the HP 48: 


[Number Description 


5x9 (fixed) or EquationWriter 


3x5 (proportional spacing) 
5x7 (fixed spacing) 
5x9 (fixed spacing) 





The small (3x5) font makes no distinction between lowercase and 
uppercase characters. This is the font used to build menu labels. Note 
that the small font is proportional. The character “T’ is the narrowest, 
and characters like “M” are wider than most. 


The large font (5x9) is the font used for the stack display, and shows 
the most detail for special characters. 


Font size 0 is a special case. Except for algebraic and unit objects, 
objects are expressed with the large (5x9) font. Algebraic and unit 
objects are expressed in their form as seen in the EquationWriter, and 
are displayed in a grob that has a minimum size of 131x56. 
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Example: The program TXTEX displays the words “Small”, 
“Medium”, and “Large” in the display, then displays the equation 
"SINC)7X' in EquationWriter form. To illustrate the boundaries of 
the text, the graphics objects are inverted with the NEG command. The 
EquationWriter example, returned as a 131x56 grob, is reduced in size 
with the SUB command. 


TXTEX 359 Bytes Checksum #96D9h 


4 

PICT RCL +pictsav Preserve original PICT 

4 
PICT PURGE Purge original PICT 
PICT ¢ #14d #58d 3 
"Small" 1 +GROB NEG GOR Draw small font example 
PICT {< #46d #56d } 
"Medium" 2 +GROB NEG GOR Medium font example 
PICT { #86d #54d } 
"Large" 3 +GROB NEG GOR Draw large font example 
PICT ¢ #46d #15d } 
'SINCKI/K' & +GROB NEG EquationWriter example 
{ #@d #13d 3 
{ #37d #37d 3 
SUB Extract corner with equation 
GOR Place into PICT 
{3} P¥IEW Show PICT, wait for (GANCEL) 
Pictsay PICT STO Restore original PICT 

* 

% 


SIN(H) 


wanes GEERT IEEE 
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Animation Sequences 
To display a sequence of graphics objects, use the sequence 


* PICT € #6 #6 3 grob REPL * 
rather than the sequence 
* grob PICT STO *. 


This will be faster and will avoid flickering in the display. 


The ANIMATE command is helpful for rapidly displaying a series of 
grobs in PICT. ANIMATE takes a series of grobs and either a number 
specifying the number of grobs to use or a list: 


grob, ... grob, n > 
grob, ... grob, { n { #x #y } delay repeat} —> 


The list parameter must contain exactly the following four objects: 


n The number of grobs on the stack 


{ #x #y } The location in PICT (pixel coordinates) at which the 
upper-left corner of the grobs will be placed. 


delay The delay time (in seconds) between each grob. A zero 
delay time is fastest. 


repeat The number of times to cycle through the sequence of 
grobs. If the repeat count is zero, the program will cycle 
through the grobs 1048575 times or until the 
key is pressed. 


ANIMATE may be interrupted by pressing (CANCEL) at any time. 
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Example. A series of four grobs can be used to simulate a hand 
moving around a clock face. 


ANIM 192.5 Bytes Checksum #D062h 


« 

GROB 9 9 83606D062960111611161616239606CE08348 
GROB 9 9 83606C06286016161F16161628606CH08348 
GROB 9 9 83606C06286016161116111629666D608360 
GROB 9 9 83606C80280601616F 116161628606CHH83400 
{ 4¢ #61d #28d 3.15 3 

ANIMATE 

3 DROPN 
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Stack View Program 


The stack-view program STKV displays up to ten levels of the stack 
simultaneously. The display mode, plot parameters, stack values, and 
graphics picture are preserved. The system remains halted until 
is pressed, then the program restores PPAR and PICT. 


STKV 377.5 Bytes Checksum #6C64h 


* IF DEPTH THEN 
PICT RCL PPAR 
+ pictsay ppar 
* PICT PURGE 
1 32 XRNG 1 64 YRHG 


1 DEPTH 1 - 16 MIW DUP 


IF 8 > 

THEN 6 1 

ELSE 8 2 

EWD + rowht tsize 


* FOR i PICT 1 i rowht 


* ReC RCLF STD i 
": " + SWAP STOF 
i 3 + PICK #STR + 
tsize +GROB GOR 


'PPAR' PURGE ppar 
IF 'PPAR' SAME HOT 


THEN ppar 'PPAR' STO 
EMD pictsayv PICT STO 


» 
END 


oO: 


1 

g: 
B: 
?: 
6: 
§: 
uy: 
3: 
2: 
1: 


Graphics 


Make sure stack is not empty 


Preserve PICT & PPAR 

Purge original PICT 

Set new X and Y ranges for stack 
Determine current stack height 
If greater than 8, text row height 
is 6 and text size is 1 

Otherwise, text row height is 8 
and text size is 2 

Loop for the no. of stack levels 
Use STD display mode to build 
stack level identifier 

Add stack value to identifier, 
and add to picture 

End loop 

Show PICT, wait for 
Purge new PPAR 

Did PPAR exist before? 

Yes, store old value 

Restore original PICT 
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Graphics Object Structure 


A graphics object is structured as follows: 
<header><length><height><width><data...> 


header This is a five nibble (1/2 byte) field that distinguishes a 
graphics object from any other object type, and has a fixed 
value of #02B1Eh. 


length This field is a five-nibble quantity that contains the distance in 
nibbles from the start of the length field to the nibble past the 
end of the object. This length is #Fh + the number of data 
nibbles. 


height This field is a five-nibble quantity that specifies the height of 
the graphics image in pixels. 


width This field is a five-nibble quantity that specifies the width of 
the graphics image in pixels. 


data The data nibbles begin at the upper-left corner of the graphics 
object and proceed left-to-right, top-to-bottom. Each row 
must contain an integral number of bytes, so the data may be 
padded with garbage bits. The bits in each nibble are written 
in reverse order, so the leftmost displayed pixel in a nibble is 
represented by the least-significant bit of the nibble. 


If you are preparing a graphics object on a personal computer, 
remember that the HP 48 CPU reads data from memory into registers in 
reverse order, so the first four fields are written backwards. For 
example, the header is written E1B20. 


Graphics objects may be entered into the command line on the HP 48. 


To enter a blank graphics object, type GROB width height, where width 
and height specify the size in pixels. 
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Examples. To enter a graphics object which represents “G” in the 


small font, type GROB 4 5 E#18D895E8. 





On a personal computer, the graphics object looks like this: 


E1B20 B1000 50000 40000 E010D090E0 


header length width height data 


In the second example consider a blank graphics object that is the size 
of the display with the “G” from above in the upper-left corner. The 
graphics object looks like this on a personal computer: 


E1B20 
F8800 
38000 
04000 
EOOOO00000000000000000000000000000 
1000000000000000000000000000000000 
DOODDODDDDDDDD00000000000000000000000 
YODDD0D0000000000000000000000000000 
E000000000000000000000000000000000 
OODDDDDD000000000000000000000000000 
...2176 total data nibbles 
EO0O0000000000000000000000000000000 


Graphics 


header 
length 
width 
height 
row I 
row 2 
row 3 
row 4 
row 5 
row 6 


row 64 
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The fields for the example of the previous page are derived as follows: 


° The display width is 131 columns = 83h pixels, or 17 bytes or 34 
nibbles. 


° The display height is 64 rows = 40h pixels. 


¢ The data length is bytes-per-row X rows = 2176 nibbles. The 
length field is calculated as 2176 + 15 = 2191d = 88Fh. 


PPAR 


The reserved variable PPAR (which may exist in every directory) 
contains scaling information and plot specifications. 


PPAR 


{ (Xmin» Ymin) (Xmax» Ymax) indep resolution (Xaxis, Yaxis) ptype depend } 


| Parameter | __—Description _——|_ Default _| 
(Xmin» Ymin) Lower-left pixel coordinates (-6.5, -3.1) 
(Xmax> Ymax) Upper-right pixel coordinates (6.5, 3.2) 


Independent variable for horizontal 
axis 


resolution Real positive integer for user-unit 
point spacing, or binary integer for 
pixel spacing (0= every column). 


(Xaxis» Yaxis) Axes intersection coordinates, tick (0,0) 
specification, and axes labels. 

ptype Plot type: FUNCTION, CONIC, BAR, || FUNCTION 
POLAR, DIFFEQ, PARAMETRIC, 
HISTOGRAM, SCATTER, TRUTH, 
SLOPEFIELD, WIREFRAME, YSLICE, 


PCONTOUR, GRIDMAP, or 
PARSURFACE. 


Dependent variable 


The lower-left and upper-right pixel coordinates are used to initialize 
VPAR parameters if VPAR hasn’t been specified for 3D plots. 
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INDEP and DEPEND. The parameters indep and depend specify the 
independent and dependent variables, and can specify a plotting range, 
which is used to control the range of a plot for plot types such as polar 
and parametric. The full definition for these parameters is: 


indep: { name Xstart Xend } 
depend: { name Ystart Yend } 


For BAR plots, Xstart specifies the horizontal location of the first bar. 
If the plot type is DIFFEQ, indep and depend are used as follows: 


indep: { name to tg } Default: { ‘T’ 0 Xmax } 
depend: {name ygErrorTolerance } Default: { “Y’ 00 } 


RES. The resolution parameter specifies the interval between plotted 
points of the independent variable in user (real number) or pixel (binary 
integer) units. The default value is 0, which specifies one point every 
column. Some plot types use resolution differently: 


BAR Specifies the width of each bar 

DIFFEQ Specifies the maximum interval (unlimited if 0). 
The initial interval is the smaller of Iltp—toll and 
res, or Iltp—toll/131 if resolution=0. 

HISTOGRAM _ Specifies the bin width in pixels. The default bin 
size is 1/13 of the difference between the 
minimum and maximum data values. 

PARAMETRIC _ The default value of 0 specifies an interval that is 
1/130 of the difference between Xgtart and Xend- 

POLAR The default value of 0 specifies hie?) grads, or 
7/90 radians. 


The plot types PARSURFACE, PCONTOUR, SCATTER, 
SLOPEFIELD, and WIREFRAME do not use resolution. 
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AXES. The axes parameter can specify the intersection of the plot 
axes, the spacing of tick marks, and axes labels. The tick mark 
specification and the labels are optional. The full definition for the axes 
parameter is: 


{ intersection tick “x-label” “y-label” } 
where: 


intersection The axes intersection is specified as a complex 
number. 


tick The tick parameter may contain a tick spacing 
parameter expressed in either user-units or pixels. 
User unit spacing is expressed as a real number 
specifying the spacing for both the x and y axes, ora 
list containing two real numbers which specify the x 
and y spacing. Pixel spacing is expressed as a binary 
integer number of tick marks for both axes, or a list of 
two binary integers which specify the x and y spacing. 


Examples: 
5 5 user unit spacing on each axis. 
{ 110} 1 unit on the x-axis, and 10 units on 
the y-axis. 
#5d 5 pixel spacing on each axis. 
{ #5 #10 } 5 pixels on the x-axis, and 10 pixels 
on the y-axis. 
“x-label” Horizontal axis label. 
“y-label” Vertical axis label. 


If the plot type is DIFFEQ, the axes labels are used as follows: 


“x-label”: Index for which independent variable, vector-valued 
solution to plot on the horizontal axis “1”, “2”, etc. 

“y-label”: Index for which dependent variable, vector-valued 
solution to plot on the vertical axis “1”, “2”, etc. 
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VPAR 


The view volume is a region in abstract 3-dimensional space used by 
the 3D plot types. The reserved variable VPAR stores the dimensions 
of the view volume, the location of the eye point, the input ranges for 
gridmap and parsurface plots, and the number of plotting steps. VPAR 
can reside in any directory, like EQ and PPAR. 


VPAR 


{ Xeft Xright Ynear Year Ziow Zrigh Xmin Xmax Yimin Ymax Xeye Yeye Zeye X Y 


eye “ eye ““eye “*step step } 


Parameter 
Width of view volume 


Depth of view volume 


Ziow Zhigh Height of view volume 


Xmin Xmax X-input range for GRIDMAP and -1 1 
PARSURFACE plots 

Vaan’? Y max Y-input range for GRIDMAP and -1 1 
PARSURFACE plots 


Xeye Yeye Zeye | Coordinates of the eyepoint 
Xstep Ystep Number of plotting steps 








So 
e Eyepoint 


(Xeye, Yeye,Zeye) 
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Programming 


The HP 48 provides several avenues for customization: user-defined 
keys, the CST menu, equations supplied to the solver, user-defined 
functions, and programs, which offer the most flexibility for 
customization. 


In the simplest form, a program is an object consisting of a collection of 
commands or functions enclosed by program delimiters (« * ). A 
simple example returns the circumference of a circle given its radius in 
level 1: 


* 2% 7 * +NUM ® 


When stored in a variable, this program can be executed simply by 
pressing its menu key in the VAR menu or including its name in 
another program. 


Program Execution 

When a program is executed, the objects that make up the program 
have actions that are specific to their type. Data class objects (such as 
numbers, arrays, strings, algebraic objects, or lists) or programs are 
placed on the stack. Quoted global or local variable names are placed 
on the stack. If a local variable name is unquoted, its contents are 
placed on the stack. An unquoted global variable name will have 
behavior dependent on the contents of the variable: 


| Contents | Action 


Program Executes the program 


Name Evaluates the name 
Directory Makes directory current 
Any other object Puts contents on the stack 





To illustrate the evaluation of variable names, store the number 8 in 
variable C, the name ‘C’ in variable B, and the name ‘B’ in variable A. 
The program * A * will now return the value 8. 
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Single-Stepping Programs 

The ERROR menu ( (PRG) ERRUF ) provides several tools for 
single-stepping through a program. There are two ways to halt 
execution within a program: 


° Place the name of the program on the stack and execute DEBUG . 
This will begin execution of the program, but the program will be 
suspended at the first step. 


¢ Insert the HALT command in your program where you’d like to 
suspend execution. When executed, the program will be 
suspended and ready to execute the object after HALT. 


Once the program has been suspended, the following operations are 
available: 


SST Executes the next object in the program. If the next object 
is a program, =2T executes the whole program as one 
step, as opposed to SST+. 


sob! If the next object is a named program, single-steps into 
the program, otherwise just executes the object. 


HEMT Displays the next one or two objects in the program. 
(—)(CONT) Resumes program execution. The program will continue 
until another HALT command is encountered or the 


program ends. 


KILL Cancels all suspended programs. 
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Local Variables 

Programs which use a large number of variables and/or intermediate 
results may use local variables to provide intermediate storage off the 
stack. 


The formal syntax for programs using local variables is: 
* + local-names defining-procedure * 


If the values for local variables are established at the start of the 
program, the syntax looks like this: 


* establish-values + local-names defining-procedure * 


The defining procedure may be either an algebraic expression or a 
program: 

* + local-names ‘algebraic! * 

* + local-names * program*® * 


Local variables exist in a local (temporary) environment during 
execution of the defining procedure and take precedence over global 
variables of the same name when evaluated. Temporary environments 
may be nested (programs within programs). In this case, evaluation of 
a local variable name returns the contents of the most recently defined 
local variable of that name. 


When stack objects are first stored in local variables by the + operator, 
the object in level 1 is stored in the last name in the series of local 
variables. By convention, local variables are written in lowercase. 


There are a number of advantages that come with the use of local 
variables: 


© Conflicts with global variables are avoided. 


e Storing to a local variable is quite fast, because temporary 
environments are typically quite small, and avoid the overhead of 
moving all the data in global variables. Depending on the number 
of global variables in the current path, fewer local variables may be 
searched, reducing the time required for programs to store & recall 
objects. 
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¢ Temporary environments are automatically removed at the end of 
the defining procedure, so the defining procedure does not have to 
spend time and extra code “cleaning up” after itself. 

© Programs are often easier to write (and later on, to read) when 
intermediate values are stored in named local variables than 
programs which keep everything on the stack. (Imagine 
remembering which value resides in stack level 22 two years after 
you write a program.) 


Example: To illustrate the action of + as it stores objects on the stack 
into local variables, consider the program LCLV: 


LCLV 78.5 Bytes Checksum #7AA3h 


*3eabec 
x 
a "a" +TAG 
b "b" +TAG 
c"c" 3TAG 
* 
» 


The program LCLV tags the objects stored in local variables with the 
names of the local variables. If you have the number 3 in level 3, 2 in 
level 2, and 1 in level 1, the results from LCLV are: 


32175 a3 b:2 c:l 


Example: Suppose the stack contains the same values as above (3 in 
level 3, 2 in level 2, and 1 in level 1). The following programs produce 
the same result (17) by first assigning the values to local variables x, y, 
and z: 

* 3x y Zz 'Cx¥ytzox2+x' 2 


&+xyuz 
&xuyuF z+2#x + 
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Example: Consider two approaches to finding the roots of a quadratic 
equation x=ax?+bx+c. We’ll use the quadratic formula: 


-b+ Vb? —4ac 


2a 
The stack diagram for these program examples will be: 


a b c — root; root 


Each example program will bind the values for a, b, and c into local 
variables a, b, and c. 


The first program, QRT1, places the intermediate result J (b?—4ac ) on 
the stack: 


QRT1 116 Bytes Checksum #6DElh 


€+eabec Create local variables 
¥ 
bSQ@ac#4#-T Calculate 4 (b?-4ac) 
b NEG OVER+a2t ¢ Calculate first root 
b WEG ROT -a2te Calculate second root 
* 
* 


44 Programming 


The second program, QRT2, uses two algebraic expressions. This 
version is somewhat longer, but easier to read: 


QRT2 159.5 Bytes Checksum #6C6Dh 


€+e abc 
< 


'€-bt+/ (b*2-44a%09)/02%a)0' NUM 
'C-b-I¢b*2-4#a%c039702%a)' +NUM 
Pg 


Programs as Subroutines 

The HP 48 has no formal notion of a subroutine, as defined in other 
languages such as BASIC. A subroutine in the HP 48 is simply another 
program which follows the same basic rules as all other programs. The 
moniker “subroutine” or “subprogram” may be applied to any HP 48 
program for the sake of clarity or convention. Subroutines may be 
stored in global variables to simplify the structure of a program. If 
you’re writing an application that will be distributed to other people, 
it’s best to avoid excessive use of global variable usage for subroutines 
and intermediate results. 


Two techniques are available for minimizing the use of global 
variables. The first is to store subroutines in local variables, the second 
is to use local variable compilation to reduce the use of global variables 
for intermediate results. Some programs in the chapter Example 
Programs use these techniques. 


Subroutines in Local Variables. If you don’t want to store 
subroutines in global variables, you can store them in local variables. 


When a local variable name is evaluated, it only recalls the contents of 
the variable. This is similar to evaluating global names that contain 
data objects. Consequently, if the local variable contains a program, it 
can only be executed by an explicit EVAL. To improve legibility, local 
variables containing subroutines are often named in initial caps (like 
Subr). 
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Example: To illustrate the use of subroutines in local variables, 
consider a modification of the program QRT1, where the sequence 


2ee7 


is placed in a subroutine: 


QRT3 148.5 Bytes Checksum #89F 1h 


¥ 
27% Place subroutine on stack 
+ abc Subr Create local variables 
< 
bSQac#4#-fT Calculate $(b2—4ac) 
b NEG OVER + a Subr EYAL = Calculate first root 
b NEG ROT - a Subr EYAL Calculate second root 
> 


Compiling Local Variable Names. Ordinarily, local variables (and 
hence local variable name objects) exist only within the context of the 
defining object. This yields a problem for sharing data between two 
programs stored in global variables or a subroutine stored in a local 
variable which needs to access local variables from the defining 
procedure. Until the arrival of the HP 48G/GX models, the only way to 
create a program stored in a global variable that uses another program’s 
local variables was to HALT the program containing the defining 
procedure, then enter and store the new program. In practice this is not 
satisfactory, because you cannot edit the program without once again 
setting up the temporary environment. 


In the HP 48G/GX, variable names which are prefixed with the 
character ¢ ( (a) (P) 4 ) are compiled as local variable name objects, 
and thus can access temporary environments when evaluated, even 
though the temporary environment does not yet exist when the program 
is entered into the HP 48. 
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Example: Notice that both uses of the program Subr in the program 
QRT3 are preceded by the execution of the local name object a. These 
two instances may be combined into Subr by using ¢ to specify a as a 
local name object. 


QRT4 147 Bytes Checksum #7720h 


< 
ta 2% + ® Place subroutine on stack 
+ ¢a bc Subr Create local variables 
€ 
bS@¢tactdqe-J Calculate J (b?—4ac) 
b NEG OVER + Subr EVAL Calculate first root 
b NEG ROT - Subr EYAL Calculate second root 
% 
* 


Example: The subroutine can also be stored in a global variable: 


SUBR 31.5 Bytes Checksum #8CC2h 


*& ta 2# “ * 


QRT5 109 Bytes Checksum #CDD 1h 


< 
+ ¢abec Create local variables 
< 
bSQ¢ac#qde-TJT Calculate J (b?—4ac) 
b HEG OVER + SUBR Calculate first root 
b HEG ROT - SUBR Calculate second root 
* 
& 


Here you see that the program SUBR can be entered independently of 
the program QRT5. One implication of this technique is that one 
program can be used by several other programs without the burden of 
sharing data through global variables. 
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User-Defined Functions 

User-defined functions may be used to extend the function set of the 
HP 48. A user-defined function takes its arguments from the stack and 
must return exactly one result to the stack. The arguments may be 
either algebraic or numeric. 


The syntax of a user-defined function must be exactly: 
* + local-names defining-procedure * 


User-defined functions created with the DEFINE command use an 
algebraic expression as the defining procedure. If the defining 
procedure is a program, the program must remove all arguments from 
the stack and return one real number. 


The DEFINE command simplifies the creation of a user-defined 
function by converting an expression in the form 


"name arguments} =expression' 


into a named program that consists of a local variable structure and an 
algebraic expression. A user-defined function may be stored into a 
local variable (see the program TREE in Example Programs for an 
illustration of this technique). 


The example program UDFUI shows how an input form can be created 
from a user-defined function. 


Example: Create a function POLY(x)=2x?+4x+7. Enter the 
expression 'POLY¢x)=24x*2+4%#x+7' and execute DEFINE. The 
variable POLY now contains the program: 


& > x '2¥x*24+dext+T' & 


If the number 8 is in level 1, executing POLY yields 167. Assuming 
that the variable S is undefined, POLY(‘S+5’) yields the expression 
"2eCS+5*24+4eC5+5 +7". 


Example: Create a function PTHG(x,y)=S (x2+y2). Enter the 
expression 'PTHG¢ xs y= ¢x*2+y%2)' and execute DEFINE. The 
variable PTHG in the VAR menu now contains the program: 


€3x yu 'Itx*2+y*2)' 2 
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Looping Structures 


Program loops are useful for repetitive execution of a procedure. There 
are two general classes of loops: 


¢ Definite loops execute a loop-clause at least once, and execute 
a predefined number of iterations. 


¢ Indefinite loops execute a loop-clause repeatedly until a test- 
clause returns a true (non-zero) result. One form of an 
indefinite loop may not execute at all if an initial test fails. 


Definite Loops. There are two types of definite loops, both of which 
can have an increment of either 1 or n: 


Start finish FOR index loop-clause NEXT 

Start finish FOR index loop-clause increment STEP 
start finish START loop-clause NEXT 

start finish START loop-clause increment STEP 


In each case the start and finish values are taken from the stack and are 
no longer available to the program. The index is a local variable that 
may be referenced in the loop clause just like any other local variable. 
The increment is also taken from the stack. This syntax shows it being 
put there explicitly by the program, but it can be calculated also. 


Increment=1 Increment=n 


FOR ... NEXT FOR ... n STEP 
START ... NEXT | START ... n STEP 










Index 
No Index 
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The differences are: 


¢ FOR loops keep their index in a local variable which is 
available to the loop-clause. An early exit may be taken from 
a FOR loop by one of the following two methods: 


¢ Store MAXR in the index for loops with a positive step. 
° Store -MAXR in the index for loops with a negative step. 


¢ START loops save memory and execute faster than FOR loops 
for applications where access to the index is not needed. 


¢ Loops ending with STEP may have a varying increment. 
When STEP is executed, the increment is added to the index. 
The loop will repeat under the following conditions: 


¢ The increment is positive and the incremented index is 
less than the finish value. 


¢ The increment is negative and the incremented index is 
greater than the finish value. 


© Loops ending with NEXT execute faster than those ending 
with STEP, because the increment value is always 1. 


Examples: 
* 1 18 START loop-clause HEXT * 
Executes loop-clause 10 times. 


* 1 26 FOR x loop-clause HEXT * 
Executes loop-clause 20 times; x is the index. 


* 1 18 START loop-clause2 STEP *# 
Executes loop-clause 5 times. 


* 1 26 FOR x loop-clause 2 STEP # 
Executes loop-clause 10 times; x is the index. 
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Indefinite Loops. There are two forms of indefinite loops: 


¢ BO loop-clause UNTIL test-clause END 


DO loops execute at least once. The placement of UNTIL is 
not important since the test occurs at the end, but by 
convention is placed between the loop and test clauses to 
improve legibility. 


¢ ~=WHILE test-clause REPEAT loop-clause END 


WHILE loops never execute if the test-clause returns an initial 
false (zero) result. The placement of REPEAT is important, as 
it isolates the test clause, which usually executes one time 
more than the loop clause. 


Loop Counters. The commands INCR and DECR may be used at 
any time to increment or decrement a real number stored in a variable. 


The command INCR takes a local or global variable name, increments 
its contents, and returns the new value to the stack. For instance, if x 
contains 23, 'x' INCR stores 24 in x and returns 24 to the stack. 
DECR behaves the same way as INCR, but decrements the variable’s 
contents. 


Examples: The first program (46.5 bytes, checksum #9910h) always 
prints at least one carriage-right, up to the number of carriage-rights 
specified in level 1. The second program (51.5 bytes, checksum 
#449Fh) prints the number of carriage-rights specified in level 1. 


ek 

* DO CR UNTIL 'x' DECR NOT END » 
» 
* DUP + x 


* WHILE REPEAT CR x DECR END » 
* 


The program DSORT uses INCR (see Sorting Directories). 
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Conditional Structures 


IF Structures. The IF structures perform a test and execute a true- 
clause if the test is true or a false-clause if the structure includes ELSE. 


IF 
IF test-clause 


test-clause THEN 
THEN true-clause 


true-clause |ELSE 
END false-clause 


END 





Example: This program (82.5 bytes, checksum #ACFOh) stores a 
value from the stack into variable a and returns .35*a or .45*a if a >10. 


ea 
* IF 'a>ig' 
THEN .45 
ELSE .35 
END 
a ¥ 
> 
2 


IFT and IFTE. IFT and IFTE may be used as commands, taking their 
arguments from the stack. IFTE may also be used in an algebraic 


expression. 


IFTE¢ test-clauses true-clauses false-clause } 


| _t__ result 


test-result true-clause 
true-clause | false-clause 
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CASE Structures. The CASE ... END structure combines a series of 
IF ... THEN structures that ends when the first true condition has been 
met. A “default” clause may be placed before the END command 
which is executed if none of the conditions have been met. 


test-clause THEH = true-clause END 
test-clause THEN = true-clause END 


test-clause THEN = true-clause END 
default-clause 





Example: This program (127 bytes, checksum #A7FIh) accepts an 
object and issues an error for non-real types, then executes the 
procedure Xneg for numbers less than zero, Xzero for numbers equal to 
zero, or Xpos in the default case. 


The type for a real number is zero, so a non-real object generates a true 
condition. In this case the command DOERR will issue message 
#202h, “Bad Argument Type”. 


< 
+x 
*« CASE 
x TYPE THEN # 262h DOERR END 
'x<@' THEN Kneg END 
'x==6' THEN Xzero END 
Kpos 
* 
% 
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Error Trapping 

The IFERR structure is useful for trapping anticipated errors. The trap- 
clause is executed first, and if no error is encountered (or the 
key has not been pressed) an optional ELSE normal-clause is executed. 


IFERR 
IFERR trap-clause 
trap-clause THEN 


THEN error-clause 
error-clause ELSE 
END normal-clause 
END 





If an error occurs within the trap clause, the following steps are taken: 
1) The error is suppressed — the program will not be halted. 
2) The keyboard input buffer is flushed. 


3) Ifthe Last Arguments flag (—55) is clear (default), the arguments to 
the command that generated the error are returned to the stack. 


4) All three regions of the stack display are “unfrozen” (see 
Displaying Results for a description of the display regions and the 
FREEZE command). 


5) The error-clause is executed. 


Example: This program (63 bytes, checksum #29FBh) takes an object 
from the stack and returns the object’s size in bytes. If the object is a 
name and no variable of that name exists, the program returns 0. 


« 
IFERR BYTES 
THEN IF -55 FC? THEN DROP END & 
ELSE SWAP DROP END 

% 
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Example: Trapping (CANCEL). The IFERR structures can be used to 
trap the error generated by the keystroke (error number 0). 
The program TRPCN illustrates this by embedding an infinite WHILE 
loop within an IFERR trap. As a counter is incremented, its value is 
displayed on successive lines of the display. The MOD function is 
used to wrap the display sequence from the bottom of the display back 
to the top. When is pressed, the program could be anywhere 
in the trap clause when the branch to the error clause occurs. The error 
clause compares the current number of objects on the stack with the 
original number and drops the difference. 


TRPCN 124.5 Bytes Checksum #1DD0h 


« 
DEPTH Save stack depth 
+ depth 
« 
IFERR Set error trap 
13 Initial counter value is 0 
WHILE 1 Loop forever 
REPEAT 
DUP DUP 7 MOD 1+ Calculate display line number 
DISP .1 WAIT Display counter value, pause 
1+ Increment counter 
END 
THEN 
DEPTH depth —- BROPW Error clause cleans up stack 
END 
* 
* 


Error Interpretation. The commands ERRM and ERRN return the 
most recent error message and error number. ERRO clears the error 
number. These commands may be useful in an error clause for taking 
specific action for different kinds of errors. 


User-Defined Errors. The command DOERR accepts either a 
system error number or a string. If the error number is zero, the action 
is equivalent to pressing (CANCEL), and ERRM and ERRN are set to" 
and 0. If a string is suppied, the string will be returned by ERRM and 
the error number will be set to #7484Gh. 
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Data Entry 

A program may halt to obtain user input using a wide variety of 
techniques. These techniques have varying levels of restrictions on 
keyboard and stack operations, as well as varying cosmetic appeal. 


The WAIT Command. When a single keystroke is required, the 
WAIT command is the preferred method. WAIT places the HP 48 into 
a light sleep mode to conserve batteries and returns the next keystroke 
in rc.p format. The rc.p encoding refers to the row, column, and shift 
plane location of the key that was pressed. 


| Ps Primary Planes ie =e i Alpha Planes 


Oor1 | Unshifted 4 Alpha 
2 Left-shifted 5 Alpha left-shifted 
3 Right-shifted 6 Alpha right-shifted 


The WAIT command is interrupted when the key is pressed. 
If an application must intercept (CANCEL), use an IFERR trap or the 
System-RPL object WaitForKey described under Keyboard Control in 
the chapter System Programming. 





The HALT Command. When HALT is executed, program execution 
stops and the stack is displayed. The program resumes when the 
command CONT is executed or the user presses (Q{CONT). The stack is 
available for use while a program is HALTed. A program that has been 
HALTed may be completely terminated by executing KILL. 


The PROMPT Command. When PROMPT is executed the program 
displays a message and halts until CONT or KILL are executed. Using 
PROMPT is equivalent to the sequence: 


* ... "string" 1 DISP 3 FREEZE HALT ... * 


The stack is available for use while the program is halted. 
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The INPUT Command. The INPUT command suspends program 
execution, displays a message and default answer, and waits for user 
input. The INPUT command terminates and program execution 
resumes when is pressed. The parameters supplied to INPUT 
provide considerable control over the appearance of the display and 
cursor placement. The stack is not available in this state, but menus 
may be changed. 


The parameters for INPUT can be specified in varying levels of detail: 


“message” ”’prompt” — result” 

“message” { mode(s)} — “result” 

“message” { “prompt” column} — result” 

“message” { “prompt” mode(s)} — result” 

“message” { “prompt” column mode(s) } — result” 
“message” { “prompt” { row column } mode(s) } — ”result” 


In the simple case, “prompt” is the default answer, which will be 
returned to the stack if [ENTER] is pressed immediately. 


The cursor position may be specified as a column number or as a list 
specifying the row and column number. A zero value for the column 
position specifies the end of the row. Rows are numbered beginning 
with 1 for the top row of the prompt text. A zero value for the row 
number specifies the last row. 


The cursor type is controlled by the value and sign of the column 
number (or row number if both row and number are specified). If this 
number is negative, the replace cursor is displayed. If this value is zero 
or positive, the insert cursor is displayed. 


The modes may be any of the following (entered as unquoted names): 


a Locks alpha entry on for text entry 

ALG _ Selects Algebraic/Program-entry mode. The default entry 
mode is Program-entry. 

Vv Verifies that the result string represents one or more valid 
object. If the string fails this test, the error message “Invalid 
Syntax” is displayed and INPUT does not terminate. 
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INPUT Example: The following program fragment (69.5 bytes, 
checksum #C169h) prompts for two values using tags in the prompt 
string to help enter and delimit the results. The = character in the 
prompt represents a newline character ( (P)(#) ). The cursor is 
positioned at the end of the first row, and V is used to ensure two valid 
objects are contained in the result string. 


* "Enter & & YE" "SMeeryi" € 1 6 > ¥ > INPUT 


{ HOME + 
Enter K & ‘Ys 





DS Ea Es ee ed Ee 


If you’re writing a program for yourself, INPUT might be just the trick 
for setting up a prompt. If you’re writing a program that needs to 
prompt for multiple values and will be distributed to a wide audience, 
there are three things to consider: 


1) The display above shows the PRG TYPE menu. You may wish to 
display the EDIT menu before executing the INPUT command. 
This can be done by executing 28 MENU or 28 TMENU. A 
custom menu can also enhance the use of the INPUT command. 
There’s an example of this on the next page. 


2) The action of the key should be considered. Where there 
is data in the command line, the first press of acts to 
clear the command line. When there is no data in the command 
line terminates the program. 


3) Remember that regardless of the contents of the prompt message, 
the use of the V option, or the use of a custom menu, the user can 
still enter any number of objects of arbitrary type. It’s a fair 
amount of work to create a truly bullet-proof program that uses 
INPUT to return exactly the number of objects that you want and 
that those objects are of the right type. The INFORM command 
(described later) might be a better tool in some cases. 
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Data Entry With Custom Menus. A custom menu can be used to 
provide significant additional flexibility when used in conjunction with 
the INPUT, PROMPT, or WAIT commands: 


¢ INPUT: A custom menu provides typing aids. 


¢ PROMPT: A custom menu can provide execution objects 
which optionally include CONT to resume program execution. 


¢ WAIT: A custom menu can provide menu key labels for single 
keystroke responses, such as menukeys YES or HO 


Example: INPUT with Custom Menu. The following program 
fragment (102 bytes, checksum #9067h) accepts a string while 
providing a menu of common responses. The MENU command at the 
end of the program restores the previous menu. 


¥ 
£ "RED" "ORG" "VEL" "GRN" "BLU" "WHT" ¥ 
TMENU "Enter a color code:" "" INPUT & MENU 
% 


Example: PROMPT with Custom Menu. The program PRMCNT 
displays a simple menu which stores zeros or accumulates numbers into 
variables A and B. When ['OHE is pressed the CONT command 
continues the program, which then displays the sums of A and B. 


PRMCNT 281 Bytes Checksum #1261d 


< 
6 'A' STO 6 'B' STO 
<< "CLRA" « 6 'A' STO * 3 
< "CLRB" « @ 'B' STO * 3 
< "A" « 'A' STO+ ® F 
< "B" « 'B' STO+ ® } 
<£ "DONE" CONT 3} 
> TMENU 
"Key values into A & B" PROMPT 
A "A" +TAG B "B" +TAG & MENU 
& 
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Example: WAIT with Custom Menu. The program WCM displays 
a menu, waits fora CAHCL or OE menu key response, beeps on 
invalid keys, and returns 0 if FC AHHCL was pressedorlif OE was 
pressed. 


WCM 164 Bytes Checksum #21E3h 


x 
£ nu it he oe CANCL" u OK u } 
TMENU 
DO -1 WAIT Wait for a key. 
UNTIL 
€ 15.1 16.1 3 
SWAP POS POS returns 0 for invalid key. 
IF DUP If the key was in the list... 
THEN 1 - Subtract for 0 or I result 
1 and signal end of loop. 
ELSE 1426 .@74 BEEP Otherwise beep and let the 0 result 
END from POS continue the DO loop. 
END 
6 MENU Restore the previous menu. 
» 


Note that the left parenthesis “(‘“‘ is used instead of the character “C” for 
the menu label. 


The INFORM Command. The INFORM command provides one of 
the most powerful data entry options in the HP 48.- The use of input 
forms in the HP 48 allows you to enter data into labeled fields, then 
press E  tocontinue the program. The behavior of these input 
forms is much like the input forms used for applications like Plot. The 
parameters to INFORM are supplied in five stack levels: 


“Title” {Field_Specifiers} Format_Options {Reset_Values} {Initial_Values} 
Sera 
{Final_Values} 1 or 0 


If the the input form is terminated by pressing OE or the 
final values are returned in level 2 and the number 1 is returned in level 
1. If the input form is terminated by pressing CAHCL or 
the number 0 is returned to level 1. 
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The parameters supplied to INFORM are specified as follows: 


“Title” 


{ Field_Specifiers } 


Format_Options 


{ Reset_Values } 
{ Initial_Values } 
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The input form title specified as a string. 


The field specifiers contain a label for each field, 
an optional help string and optional data type 
specifiers. A data type specifier is a real number 
corresponding to the type of object allowed (see 
Object Types). Each field specifier can take the 
following forms: 


“LABEL” 
{ “T ABEL” “HELP” } 
{ “LABEL” “HELP” TYPE; ... TYPE, } 


{ } 


If the field specifier is an empty list, the field to 
its left will expand to span two columns. Empty 
list field specifiers do not require corresponding 
values in the reset and initial value lists supplied 
in stack levels 2 and 1. 


The format options specify the number of 
columns in which the fields will be displayed, 
and an optional tab width (the spacing between 
the first character of the field label and the data): 


{ } Default: I column, tab width 3 columns 
Columns 
{ Columns Tab_width } 


The reset values are the values to be placed in the 
fields when RESET is pressed. The initial 
value are the values placed in the fields when 
INFORM is first executed. These lists may be 
empty or may contain objects and/or the 
placeholder command NOVAL to indicate 
unspecified fields: 


{ } 
{ field-objy NOVAL) obj ... } 
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The arrangement of fields in the display is restricted to four rows of one 
or more columns of fields. The portion of the display above the menu 
keys is reserved for the help message and the command line. A wide 
variety of input forms can be designed by using various combinations 
of formatting options. To put the most information possible in the 
display: 


¢ Use small field names where possible. 


© Keep the tab spacing to a minimum size (0 or | is best). In cases 
where you have just one column, a larger tab width may be more 
cosmetically appealing. 


© Combine small fields onto one line. 


Example. By specifying three columns and a tab width of 1, you can 
place twelve fields in the display (as long as the field labels are small). 


INF1 194.5 Bytes Checksum #A2F7h 


4 
"TITLE" 
c 
"Bs u "Bs u "Cs? u “hye u" "Es" "Es u 
"Gs " "HE " eye" a u" a ie oy Me fa 
> 
cara 
€123456789 1011 123 
DUP INFORM 
* 


E: 
E: 
H: 
K 





Ts A CT 


62 Programming 


Example. The program INF2 displays an input form for a 
hypothetical phone list application. The use of empty list field 
specifiers provides for wide fields for the name and phone number. 
The phone number field does not really need to be wide, but doing this 
moves the email field to the last line. 


INF2 349.5 Bytes Checksum #A42Ah 


“ 
"DEPARTMENT LIST" 
£ 
{ "NAME" "ENTER NAME" 2 3} 
{} 
{ "EMP#:" "ENTER EMPLOYEE NUMBER" @ 3 
{ "BLDG:" "ENTER BUILDING NUMBER" @ 3 
< "PHOWE#:" "ENTER PHONE EXTENSION" @ } 
{ } 
: sooner. "EMTER E-MAIL ADDRESS" 2 } 
3 
{26 } 
£ 
"Jim Donnelly" 3.1416 5 3855 "jimd@cy. hp.com" 
3 
DUP INFORM 
> 


DEPARTMENT LIST 
NAME: "Jim Donnelly' 
EMP#: 3.1416 BLDG: 5 
PHOME#: S255 


EMAIL: " jimd@cy.hp.com" 


ENTER NAME 
Te A (TCT 
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The CHOOSE Command. A choose box provides an attractive 
“dialog box” style alternative to menus for selecting from a finite series 
of options. The parameters supplied to CHOOSE are: 


“Title” { Data } start_row — object1 or 0 
“Title” The choose box title specified as a string. 


{ obj ... objp } The objects to be displayed. If each object in the 
list is a 2 object list, then the first element in each 
list is displayed in the choose box and the 
corresponding second object is returned. 


start_row The highlight is positioned at the row specified by 
a real number. If this value is 0, the objects in the 
list may only be viewed (with no highlight) and 0 
will be returned. 


If the choose box is terminated by pressing GE or (ENTER), the 
highlighted object (or its corresponding return object) is returned in 
level 2 and 1 is returned in level 1. If the choose box is terminated by 
pressing AHL or (CANCEL), the number 0 is returned to the stack. 


Example: The program CHOS1 displays a choose box which returns 
the object highlighted when (OE or (ENTER) is pressed. 


CHOS1 123.5 Bytes Checksum #442Ah 


4 
"CHOOSE A COLOR:" 
{ "RED" "ORANGE" "YELLOW" "GREEN" 
"BLUE" "INDIGO" "¥IOLET" > 
1 CHOOSE 
» 





a 
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Example: The program CHOS2 calculates the weight of an object on 
another planet. After prompting for the weight of the object on earth, 
the program displays a choice of planets. The choose box returns a list 
containing the planet’s name and a number corresponding to the force 
of gravity relative to the earth. The new weight is then calculated using 
the number and tagged with the planet’s name. 


CHOS2 429.5 Bytes Checksum #994Bh 


Ea 
"Weight on Earth?" "" INPUT OBJ+ 
CLLCD 
"CHOOSE A PLANET:" 
£ 

{ "Mercury" { "Mercury" .38 3 3} 
< "Venus" { "Venus" .89 3 } 
< "Mars" { "Mars" .38 3 3 
{ "Jupiter" { "Jupiter" 2.54 3 3 
{ "Saturn" { "Saturn" 1.67 3 } 
£ "Uranus" £ "Uranus" .8 3 } 
{ "Neptune" { "Neptune" 1.2 3 3 
3 
1 
IF CHOOSE 
THEH 
OBJ+ DROP 
ROT 
"Height on " ROT + +TAG 
END 
* 
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Displaying Results 


The stack display is organized into three areas: 


Status (Area 1) 


Rad 
HOME + 05716793 02:30:00P 





Stack/Command-line (Area 2) 
jt 
Ga ns ie re a} ~Menu (Area 3) 


The status area is contained in the top 16 pixel rows of the display, the 
stack/command-line area is contained in pixel rows 17-56, and the 
menu area occupies the last 8 pixel rows of the display. 


The stack display can be modified with the commands CLLCD, DISP, 
—LCD, and FREEZE. 


The CLLCD Command. The command CLLCD clears the stack 
display. If you execute CLLCD in a program, you may wish to use a 
FREEZE command to prevent the display from being redrawn until a 
key is pressed. 


The DISP Command. DISP takes an object from level 2, a display 
line number from level 1, and displays the object on one of 7 logical 
lines of the display using the medium size font (see the example below 
and Converting Text to Graphics). Line numbers less than | are 
interpreted as 1; line numbers greater than 7 are interpreted as 7. DISP 
blanks the specified logical line in the display, then displays as much of 
the object as will fit in the line. If the object extends beyond 22 
characters, the first 21 characters are displayed, followed by an ellipsis 
character (“...””). Objects like programs or matrices and strings with 
embedded newline characters (character 10) can be shown on more 
than one line of the display with the DISP command. 
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The FREEZE Command. FREEZE is used to freeze one or more 
display areas until a key is pressed. Each display area is represented by 
a bit in the input value to FREEZE. The values used to identify each of 
the display areas are: 


Display Area Encoding 


| Bit _| Value _ 





0 1 Status area 
1 2 Stack/command-line area 
2 4 Menu area 


To freeze more than one display area with a single FREEZE command, 
simply add up the values for each area to freeze. For example, to freeze 
the status and stack areas, execute 3 FREEZE. To freeze the entire 
display, execute 7 FREEZE. 


Example: The following program illustrates each of the 7 logical 
display lines associated with the DISP command: 


LINES 65.5 Bytes Checksum #85A9h 


« 
CLLCD Clear the display 
1 7 FOR i Loop for each line 
"Line "i+ Build the text for the line 
i DISP Display the text 
HEAT End of loop 
T FREEZE Freeze the status and stack areas 
* 





1 
2 
3 
4 
2 
6 
r 


Line 


i 
Tn in ee 
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The LCD Command. The command -LCD may be used to place 
a graphics object into the stack display. The graphics object will 
replace the top 56 lines of the display. 


Example: The following program converts an algebraic expression 
into a graphics object and displays the result in the stack display. PICT 
will remain unchanged. 


ALGSTK 54.5 Bytes Checksum #5039h 


& 
CLLCD Clear the display 
'SINCKI+K' @ +GROB Make graphic representation of eqn 
+LCD Place into stack display 
3 FREEZE Freeze the display 
* 


The counterpart to ~LCD is LCD-—. This command places a copy of 
the stack display onto level 1 of the stack as a 131x64 pixel graphics 
object. Note that this is larger than the graphics object that can be 
displayed with LCD. To display the entire result of LCD-, store the 
graphics object in PICT, then execute PVIEW, GRAPH, or PICTURE. 


The MSGBOX Command. The MSGBOX command displays a 
string in a box and waits fora OE, (ENTER), or keystroke. 
MSGBOX will divide text between lines at word boundaries, but the 
string may contain newline characters to format a message that has up 
to five lines. Messages are displayed in the medium font, and can 
display up to fifteen characters per line. 


OME + 
Warning: 


Value Out Of 





If you wish to produce a fancier result, you can add a graphic to a 
message box — see LIBEVAL in System Programming. 
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Recursion 
Three conditions must be met to permit recursive programming: 


° The system must have an unlimited return stack. 
¢ The system must have an unlimited data stack. 


¢ Programs must be able to call themselves. 


The HP 48’s data stack and return stack are limited only by available 
memory, so recursive programming is a technique that is available for 
some forms of problem solving. A recursive program uses a technique 
for repetitive calculation that works by breaking a problem into smaller 
pieces and calling itself for each piece. 


Factorial Example. The most common illustration of recursive 
programming is the factorial calculation: n!=n*(n—1)*(n—2)...2*1, 
which repeats until n=1. The test for completion is to see if the input 
parameter n<1. The program FACTRL (and TREE in Example 
Programs) uses recursion: 


FACTRL 85.5 Bytes Checksum #91DEh 


x 
7n 
« 
IF n 1 # THEN 1 
ELSE n 1 - FACTRL n ¥ 
END 
* 
2 
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List Processing 
The HP 48G/GX has list processing capabilities that can simplify some 
programming tasks. 


Command Extensions. Commands that do not accept a list as one 
of their arguments may take arguments in lists. In the simplest case, 
{245 } SF sets flags 2, 4, and 5. If the command returns a result, the 
results from a list of arguments will be returned in a list. For instance, 
{ 3 4 } SQ returns { 9 16 }. If a command takes two arguments, the 
arguments can be supplied in two lists or a list and one object: 


{23} {45}*-7 {815} 
{ AB } ‘X’ /—- { ‘A/X’ ‘B/X’ } 
‘X’ {AB }/- { ‘X/A’ ‘X/B’ } 


The command extensions do not apply to commands that have zero or a 
variable number of arguments (like TEXT or DROPN), nor do they 
apply to commands that accept any kind of argument (like DUP). 
Program control structures like START do not accept arguments in 
lists. The command + is defined to concatenate lists, so the ADD 
command has been provided for element-wise addition. 


Generalized List Processing. The command DOLIST generalizes 
the command extensions discussed above. A command, program, user- 
defined function, or named object can be applied to a list of arguments. 
A command, user-defined function, or named object that requires n 
arguments can also be applied to n lists of arguments. If n>1 then the 
lists must all be of the same size. If the number of arguments cannot be 
inferred from the command or user-defined function the number of 
arguments must be specified. 


DOLIST takes arguments in the following forms: 


{ list; } ... { list, } object — { results } 
{ list; } ... { list, } n object —-> { results } 
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DOLIST is handy when you want to perform an operation on a list of 
objects. For example, suppose you want to convert a series of names 
into strings without quote marks. This can be done by adding a name 
to an empty string. Instead of creating a FOR loop, use DOLIST: 


CAB el Y 31% "" + * DOLIST > 
{ "aM "Bu ei" wy 3 


Generating Lists of Results. The command SEQ can be used to 
generate a list of results from the repeated execution of an object given 
a variable, start, end, and step values. (These examples assume flag —3 
is clear.) 


**#2* % 'K' 13.5 SEQ 5 


C2345 6 
* 'A' A #2 'K' 13 1 SEQ OTA! 


4 3 
Ae2' ‘ARS! > 


Processing Sublists. The DOSUBS command steps through a list 
of arguments supplying groups of objects in the list as arguments to a 
command or program. 


{ list} command DOSUBS —-> { results } 
{ list } n program DOSUBS —~ { results } 


For each step through the list the specified number of arguments is 
supplied to the object. This set of arguments can be called a frame, and 
the position of the frame is defined as the position of the first object 
used in the list. The current position within the list (the frame number) 
can be determined with the NSUB command and the last position that 
will be processed with the ENDSUB command. Consider a program 
that requires two arguments as it is applied to the list {12345 }. As 
DOSUBS executes, NSUB will step from 1 to 4, and ENDSUB will 
return 4. The arguments used in each frame are underlined in the 
following table: 


| NSUB | Arguments Used 
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DOSUBS is handy for tasks like computing first differences or moving 
averages. 


Example: The command ALIST can be duplicated with DOSUBS: 


£151125673 2 « SWAP - » DOSUBS > (4614423 


Example: Suppose you want to create a list containing the moving 
average of pairs of numbers, with the first and last numbers of the 
original list added to the respective ends of the result list. The program 
MAVG does this using the NSUB and ENDSUB commands to monitor 
the position in the list. 


MAVG 135.5 Bytes Checksum #9B72h 


« 
z 
x 
CASE 
"NSUB==1' THEN OVER + 2 “ END 
"NSUB==ENDSUB' THEN SWAP OVER + 2 “ SWAP END 
+27 
END 
» 


DOSUBS 
* 


{12345 3 MAVG 971 1.52.5 3.5 4.5 5 3 


Cumulative Argument Processing. The command STREAM 
takes the first two elements from a list, applies an object to them, then 
applies the object to the result and the next element, and so on. 

{ list }} object STREAM — result 
The command J LIST can be duplicated with STREAM: 


£15 1125 67 3 * * * STREAM > 92125 
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Meta-Objects 

The term meta-object refers to a group of objects and their count that 
resides on the stack. Since stack operations are by nature very efficient, 
there are times when decomposing a list onto the stack and performing 
all operations on the stack will be more efficient than rebuilding the list 
between operations. 


The following display shows a meta-object consisting of three names 
and their count: 


"STUART" 
iT] VA" 
"FREDERIC! 
vecTETMATR] LIT] HYP [REAL | EASE, 


t 
4 
: 
rd 
1 





The term meta-stack refers to a group of objects on the stack, some of 
which may be meta-objects. The term position is used instead of level 
when discussing meta-stacks, because a meta-object actually occupies 
multiple stack levels. 


The following meta-stack consists of the string “JANET” in position 1, 
and meta-objects in positions 2 and 3: 


"LB" "JKH" "WMI" "JS" "EV" 5 215 71 3 "JANET" 
en a ~ 
Position 3 Position 2 Position 1 


Notation. To simplify discussions about meta-objects, the following 
notation is presented. The count is always assumed to be below the 
elements on the stack. The following symbols are used to indicate 
objects and meta-objects on the stack, where the right-most element is 
at the bottom of the stack: 
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<1... > 


< Ob; Ob2 Ob; > 


< ... > Ob 
<Ob...> 
<... Ob > 


An empty meta-object on the stack (which is just 
a 0, because the meta-object must have a count). 


An arbitrary meta-object on the stack. 
A meta-object composed of three objects. 


An object in level 1 and a meta-object that 
begins in level 2. 


A meta-object on the stack, with Ob at the head. 
The head is the element farthest from the count. 
This is equivalent to the decomposition of the list 
{ Ob... }. 


A meta-object on the stack, with Ob at the tail. 
The tail is the element closest to the count. This 
equivalent to the decomposition of the list 
{ ... Ob }. 


< metaz >< meta; > Two meta-objects on the meta-stack. 


Utility Names. 


A collection of short utility programs which 


manipulate meta-objects is presented below. The names start with M, 
for Meta-object, and use the following naming convention: 


LJ’ NwA tr geo PS 


i | 
a 


Refers to a list. 


Refers to the addition of an object to a meta-object. 
Refers to the deletion of an object from a meta-object. 


Refers to a meta-object. 


Refers to the head of a meta-object. 
Refers to the tail of a meta-object. 
Refers to an empty meta-object. 
Refers to the meta-object in position 2. 


The phrase “to” (converting to another form). 


Programming 


Utilities. To establish an empty meta-object on the stack, just place a 
zero in level 1. To convert a list or vector into a meta-object, execute 
OBJ—. To convert a meta-object back to a list, execute LIST. To 
convert a meta-object back to a vector, execute ~ARRY. 


There are many possible routines for meta-object manipulation. The 
following utility programs are provided to suggest the possibilities. 
Note that there is no error checking! 









MAT 25 Bytes Checksum #3538h 
Adds an object to the tail of a meta-object 


<..> Ob > <...Ob> 


* SWAP 1 + # 






MAT2 53.5 Bytes Checksum #546Eh 
Adds an object to the tail of the meta-object in position 2 
<metaz > <metay > Ob — <metay Ob> <meta, > 


x 
OVER 3 + ROLLD DUP 2 + ROLL 1 + OVER 2 + ROLLD 
» 


MAH 32.5 Bytes Checksum #4F86h 
Adds an object to the head of a meta-object 
<...> Ob — <Ob...> 


* OVER 2 + ROLLD 1 + # 


MAH2 66 Bytes Checksum #1CACh 
Adds an object to the head of the meta-object in position 2 
<metaz ><metay > Ob — <Ob metag >< meta, > 


es 
OVER DUP 4 + PICK + 3 + ROLLD DUP 
2+ ROLL 1 + OVER 2 + ROLLD 

» 
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MAM2 31 Bytes 
Concatenates two meta-objects 
<metay >< metajy> — <metaj,2> 


*« DUP 2 + ROLL + ® 


Checksum #FAD4h 







MDH 32.5 Bytes 

Extracts an object from the head of a meta-object 
<Ob...> ~~ <...>Ob 

« 1 - DUP 2 + ROLL * 


Checksum #813Dh 








MDH2 68.5 Bytes Checksum #BE54h 
Extracts an object from the head of the meta-object in position 2 
< Ob; Ob2 Ob3 > <...> — <Ob2 Ob3 ><... > Ob; 





« 
DUP 2 + PICK OVER + 2 + ROLL OVER 
3 + ROLL 1 - 3 PICK 3 + ROLLD 







* 





MDT 25 Bytes Checksum #5F4Dh 
Extracts an object from the tail of a meta-object 

<...Ob> > <...>Ob 
* 1 -— SWAP 


MDT2 56 Bytes Checksum #A95Ch 
Extracts an object from the tail of the meta-object in position 2 
< Ob; Obz Ob3 > <...> — < Ob; Ob2 ><... > Ob; 


4 

DUP 3 + ROLL OVER 

3 + ROLL 1 - 3 PICK 3 + ROLLD 
> 
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ML2M 36 Bytes 
Converts lists in levels 1 and 2 into meta-objects 
{ listy } { list, } —> <metay > <meta, > 


4 
SHAP OBJ+ DUP 2 + ROLL OBJ+ 
» 


MM2L 36 Bytes 
Converts two meta-objects into lists 
<metaz > <meta; > — { listz } { list; } 


« 
4LIST OVER 2 + ROLLD +LIST SWAP 
* 


MSWAP 73.5 Bytes Checksum #C18Fh 
Exchanges two meta-objects 
<meta) > <metajy > — <meta; > <meta) > 


Checksum #BF3h 















Checksum #499Ah 





« 

DUP 2 + PICK OVER +2+7hn 

* 1 OVER 1 + START nm ROLLD NEAT * 
* 


MZ2 30 Bytes Checksum #5038h 
Places an empty meta-object in meta—stack position 2 
<meta; > — <> <meta; > 


« 
@ OVER 2 + ROLLD 
* 
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Related Commands: DEPTH, DOLIST, DROPN, DUPN, LIST, 
LIST, OBJ, PICK, ROLL, and ROLLD. 


Example: Reversing a List. The following program expects a list 
as input and returns the reversed list as output. LREV uses a technique 
similar to that used by the HP 48’s REVLIST command. 


LREV 57.5 Bytes Checksum #D8C1h 


{ obj, ... objn } > { objy ... obj; } 


4 
@ SWAP OBJ+ 
DUP 1 SWAP 
START 
MDT MAT2 
NEXT 
DROP +LIST 


Example: Filtering a List. The following program expects a list as 
input and returns a list of all string objects in the list in their original 
order: 


SFILT 81 Bytes Checksum #F4AFh 


{ obj; ... objn } — { “string,” ... “string,” } 


@ SWAP OBJ+ 
DUP 1 SWAP 
START 
MDT IF DUP TYPE 2 SAME 
THEN MAH2 
ELSE DROP 
END 
NEXT 
DROP +LIST 
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Example: Searching a Vector. The following program scans an 
input vector and returns two lists: one with numbers < .5 in level 2, and 
one with the remaining numbers in level 1: 


VSCAN 105.5 Bytes Checksum #3418h 


[vector] — [numberss<.5] [remaining numbers] 
< 


@ SWAP OBJ+ OBJ+ DROP 
DUP 1 SWAP 
START MDT 
IF DUP .5 > 
THEN MAH2 
ELSE MAH 
END 
NEXT 
+LIST 
OVER 2 + ROLLD LIST 
» 
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Example Programs 


The example programs in this chapter are intended to be both 
educational and entertaining — they seek to illustrate various techniques 
for programming the HP 48. The HP 48 command set is rich enough 
that there is usually more than one way to do everything. 


You can use these programs as a “jumping off” point for your own 
experiments. Sometimes it’s fun to modify an example to use a 
different technique — look for modifications that make an example 
program smaller, faster, or use less memory (or all three!). 


Greatest Common Divisor 

The program GCD uses a WHILE...REPEAT...END structure to 
compute the greatest common divisor of two integers a and b. The 
remainder r = MOD(a,b) is calculated, b is replaced by a, and a 
replaced by r until r=0. 


GCD 42.5 Bytes Checksum #EBD4h 


a b ~ GCD 


WHILE DUP Loop until r=0 
REPEAT 
SHAP 
OVER MOD Calculate r=MOD(a,b) 
END 
DROP Drop r 
* 


Example: The G.C.D. of 75488266 and 32565428 is 14. 
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Least Common Multiple 
The program LCM can be used to compute the least common multiple 
m of two numbers a and b. LCM uses the formula m=a*b/GCD(a,b): 


LCM 31.5 Bytes Checksum #EF3Ah 
a b — LCM 
« 


DUP2 GCD ~ # 
» 


Example: The L.C.M. of 325 and 340 is 22100. 


Square Root’s Partial Quotients 

The program SQPQ uses an IF...THEN...ELSE...END structure and a 
DO...UNTIL...END loop to compute a list of partial quotients of the 
continued fraction equal to the square root of an integer. The list 
consists of an integer followed by the repeating quotient sequence. 


Example: 18 SQPQ returns { 4 4 8 }, which means SQRT(18) = 
4+1/(4+1/(8+1/(4+1/(8+... with 4 8 repeating. 


Example: 95 SQPQ returns { 9 1 2 1 18 } which means SQRT(95) = 
94+1/(1+(1/(2+1/(1+1/(18+... with 1 2 1 18 repeating. 


Example: 25 SQPQ returns { 5 }, which means it’s exactly 5. 
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SQPQ 315 Bytes Checksum #1D96h 
n— { list } 


£ 
IF DUP J DUP FP 
THEH 
6113hn sqrt numerator denominator size 
£ 
Do 
sqrt numerator + denominator 
“ IP DUP denominator * 
‘numerator’ STO- 
n numerator SO - 
‘denominator' STO 
1 'size' STO+ 
UNTIL 
denominator 1 == 


END 
numerator DUP + size 
% 


ELSE SWAP DROP 1 
END 
+LIST 

» 
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Polynomial Curve Fitting 

The program PFIT generates the coefficients for a polynomial which 
passes through a given set of points. The data is supplied as a matrix, 
where each row contains the x and y coordinates of a data point. 


PFIT 205.5 Bytes Checksum #AF57h 


« 
DUP SIZE 1 GET Find number of data points 
tas 
« 

Make array of y-values 


Tl 
m oO 
Wx zaM 
dae, 


Make matrix of x-powers 


oO 
7 


ae me, 


jl 
-@ 
k 


7M mw 
oO 


DUP k * SWAP 


{5s 5s } +ARRY 
SWAP DUP2 OVER / Solve system of equations 
DUP 5 ROLLD RSD Add RSD for greater accuracy 
SHAP 7 + 
% 
* 


Example: What polynomial passes through (—2,—3), (0,7), (1,6), and 
(2,9)? Use the MatrixWriter to create the data matrix: 


PFIT returns [ 1 —1 —1 7 ], representing the equation x3-x2-x+7. 
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Since there is considerable risk involved in forcing a polynomial fit to 
experimental data, you might be interested to see what the function 
looks like. The program SHWP takes a matrix containing the data from 
the stack, plots the data, and the draws the function result from PFIT. 


SHWP 277.5 Bytes Checksum #4804h 


4 


STO 

ERASE < #4 #6 3 PYIEW 
MINE ¥+ MAXE ¥> 

ROT OVER — 

1.24 * OVER + YRNG 
OVER - 1.03 * 

OVER + XRNG 

1 Nz 


NEXT 
RCLZ PFIT 
OBJ+ @ SWAP OBJ+ + 2 
FOR Jj 
'x' * j ROLL + 
-1 STEP 
STEQ 
FUNCTION DRAW 
DRAX LABEL 
{ 3 P¥IEW 
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Save the data in DAT 
Show PICT 
Find min and max data values 


Adjust y range for menu area 
Set plot ranges 


Loop for number of data points 


Get x coordinate 

Get y coordinate, make user- 
unit coordinate 

Add arrow grob to PICT 


Calculate coefficients 


Use Horner’s method to 
create algebraic polynomial 


Save equation in EQ 

Draw the function 

Draw and label axes 

Show PICT, wait for (CANCEL) 
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After SHWP has executed, the equation is in PICT and the data is 
stored in DAT. 


Example: Find and display the curve that passes through the data 
points (-1,3), (0,2), (1,4), (2,0), and (3,5). Use the MatrixWriter to 
create the data matrix: 


WNrROF 
WNoRP ND W 
mss 


Now run SHWP: 
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Slope of a Line 

The program SLOPE provides a simple example of an application that 
can be created using the INFORM and MSGBOX commands. A 
WHILE...REPEAT...END loop runs for as long as INFORM returns 1 
(when (kK is pressed). Each time INFORM returns with a new set 
of values the slope and intercept are calculated. When CAHEL is 
pressed INFORM returns 0, and the program ends. 


SLOPE 751 Bytes Checksum #7A6h 


£ 
8686666 x1 x2 yl y2mb 
< 


WHILE 
"EQUATION OF A LINE" 
£ 
< "1:5" "ENTER * COORDINATE OF POINT 1" @ 3 
< "Yi" "ENTER Y COORDINATE OF POINT i" © } 
{ "K2:" "ENTER &® COORDINATE OF POINT 2" @ } 
< "Y2:" "ENTER Y COORDINATE OF POINT 2" @ } 
{ "Mi" "SLOPE OF LINE" @ } 
< "Bs" "INTERCEPT" @ } 
+ 
{233 
xl yl x2 y2 mb 6 4LIST DUP 
INFORM 
REPEAT 
OBJ+ 3 DROPN 
'y2' STO 'x2' STO 'yi' STO 'xi' STO 
CASE 
x1 x2 == yl y2 == AND 
THEM "Equal Points!" MSGBOX END 
y2 y == 
THEN "Horizontal line Y=" y1 + MSGBOX END 
x2 x1 == 


THEN "Yertical line =" x1 + MSGBOX END 
y2yl - x2 xl - 4 'm' STOyl xl m¥- 'b' STO 
EMD 
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User Interface for User-Defined Functions 

Since user-defined functions have a fixed structure, it’s fairly simple to 
isolate the input variables and create a “mini-application” featuring an 
input form user interface. The syntax of a user-defined function must 
be exactly: 


* + local-names defining-procedure * 


The defining procedure can be either a program or algebraic object, so 
we know that the variable names reside between the + character and the 
first * or ' delimiter. The function is converted to a string, and the 
SUB command is used to extract the names in string form. To convert 
the string to a list of names, a “{“ is prepended to the string, then the 
string is converted to a list using OBJ. 


Example: Build an application for the user-defined function PTHG: 
€3x y 'I¢x*2+y*2)' & 


Place the name ‘PTHG’ on the stack and execute UDFUI. Enter values 
for the input fields x and y, then press OE . The result is placed into 
the PTHG fied, and the input form is restarted: 


A CT ca 





The program continues until you press [AHCL or (CANCEL). 
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UDFUI 336.5 Bytes Checksum #FA7Ch 


x 


ea 


t 
< 


> 
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+ + name infdat 


hame RCL 

3STR 4 OVER SIZE SUB 

wig + 1 OVER meu Pos 

3 PICK "«" POS MIN 2 - SUB 
"<" SWAP + OBJ> 

uu name + 

SWAP name + 


1<« "i" 4% 
DOLIST 
DUP SIZE 4 - CEIL OVER 
1 « DROP < NOVYAL 3 HEAD * 
DOLIST 
DUP 5 ROLLD 
4 +LIST 
‘infdat' 
WHILE 
infdat LIST+ DROP 5 ROLL 
INFORM 
REPEAT 
DUP OBJ+ DROP2 
name EVAL 
OVER SIZE SWAP PUT 
END 


STO 


Remove leading & + 
Find ' or # 

Extract variables 
Convert to list of names 
Create title string 

Add fn name to list to 
create result field 
Convert names to field 
labels with “:” 
Calculate number of cols 


Create default values 
Save copy of default vals 
Save parameters in infdat 


Loop until INFORM 
returns a zero 


Put parameters on stack 
Evaluate function 
Put result into data list 
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Sorting Directories 
Sorting the variables in a directory is as easy as executing the sequence 
*« VARS SORT ORDER », but the program DSORT adds a useful 
touch — subdirectories are placed at the beginning of the menu. This 
program illustrates uses of the commands DECR, GETI, INCR, and 
PUT. Two handy ways to use DSORT are to assign it to a key or store 
it in port 0, then you can execute :0:DSORT from any directory. 


DSORT 356.5 Bytes Checksum #18C2h 


4 
CLLCD 
"Sort 


ing directory" 


1 DISP PATH 2 DISP 


Clear display. 


Display current path. 
NOTE: “...” is chr_31 
Sort variables. 


"Sorting VAR list..." 4 DISP 
VARS SORT 
"Moving directories..." 5 DISP 


DUP DUP SIZE 8 4+n Mm 


« 
11 


n START 


GETI 
IF DUP YTYPE 15 == 


THEN 4 ROLL 


'm' INCR 
ROT PUT 3 ROLLD 


ELSE DROP 


IF DUP YTYPE 15 # 
THEN 4 ROLL 'm' INCR 
ROT PUT 3 ROLLD 
ELSE DROP 

END 


NEXT 


END 
2 


DROP2 


"Executing ORDER..." 6 DISP 
ORDER 


2 
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Level 3 list is target, 

level 2 list is source, 

and level I is list index. 
Get name, increment index. 
If directory, put into target 
list, increment target count. 


Level I list index wraps to 1 
If directories were moved, 
make a 2nd pass to move 
the variables into the target 
list. 


Drop index and source list. 


Execute ORDER on new list. 
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Date Utilities 

Some astronomical calculations require dates expressed as a specific 
number of days after an epoch. Astronomers use the Greenwich mean 
noon of January Ist 4713 B.C. as this epoch, and the number of days 
since that epoch (expressed as a fractional quantity) is called the Julian 
day number. Note that since the Julian day begins at 12:00:00 
Greenwich time, it is half a day out of step with civil time. The 
programs JDAYN and JDCAL are based on algorithms in Practical 
Astronomomy With Your Calculator, cited in the acknowledgements. 


JDAYN. The program JDAYN converts a date to a Julian day number. 


JDAYN 361.5 Bytes Checksum #91B7h 


year month day — Julian_day_number 


*«+ymd 
« 

yum 166 7 +d 16666 + + Date as YYYY.MMDDdd 

IFm2# 

THEN yi -m 12+ 

ELSE ym 

END 

+ dat yl mi 

« 

IF dat 1582.1615 > If date is in Gregorian 

THEW calendar, adjust yl, ml 
y1 106 - IP DUP 4 
¢ IP SWAP - 2 + 


ELSE @ Constant B 
END 
365,259 yl *¥ 
IF yl @ < THEN .75 - END IP Constant C 
36,6661 mi 1 + * IP Constant D 
++d+ 1726994.5 + JD=B+C+D+d+1720994.5 
& 
* 
% 


Example: May 16, 1992 is Julian day number 2448758.5. 
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JDCAL. The program JDCAL converts a Julian day number to a date. 


JDCAL 374.5 Bytes Checksum #3B06h 


Julian_day_number — year month day 


* 
.2 + DUP FP SWAP IP 
IF DUP 2299166 > 
THEN 
DUP 1867216.25 - 
36524.25 “ IP 
DUP 47 IP-1++ 
END 
i524 + 
DUP 122.1 - 365.25 7 
IP DUP 365.25 * IP 
3 PICK OVER - 36.6061 
/ IP 4 ROLL ROT - 
4 ROLL + 36.6661 
3 PICK * IP - SWAP 
IF DUP 13.5 <¢ 
THEN 1 - 


IF OVER 2.5 > 
THEN 4716 - 
ELSE 4715 - 
END 
SWAP ROT 

* 


I =integer part, F=fractional part 
If in the Gregorian calendar 


A =IP(I-1867216.25)/36524.25) 


B =I/+1+A-IP(A/4) 

Else B =I 

C =B+1524 

D =IP((C—122.1)/365.25) 

E =IP(365.25*D) 

G =IP((C-E)/30.6001) 

Day no.: C-E+F-—IP(30.6001 *G) 


Month no.: If G<13.5 
m =G-1 
else m =G-13 


Year: If m>2.5 
y =D-4716 
else y = D-4715 


Example: Julian day number 2449139.5 is June 1, 1993 
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The programs DAT2YMD and YMD2DAT convert between dates in 
HP 48 format (MM.DDYYYY or DD.MMYYYY) and separate 
numbers for the year, month, and day. Note that negative numbers may 
be used to represent B.C. dates. For instance, —6.061242 is in 1242 
B.C. 


DAT2YMD. The program DAT2YMD converts a date in HP 48 
format to separate numbers for the year, month, and day. 


DAT2YMD 113 Bytes Checksum #AE10h 


date — year month day 


« 
DUP SIGN SWAP ABS Determine sign of date, make positive 
DUP IP Isolate MM (or DD, will decide later) 
SWAP FP 146 + DD.YYYY (or MM.YYYY) 
DUP IP Isolate DD (or MM) 
SWAP FP 16606 * Isolate YYYY 
4 ROLL + Get sign and adjust year 
3 ROLLD Assume order YYYY MM DD 
IF -42 FS? If -42 set, exchange MM and DD 
THEN SWAP 
END 
* 


Example: 6.011993 —> 1993 6 1 (flag -42 clear) 
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YMD2DAT. The program YMD2DAT assembles separate numbers 
for the year, month, and day into a date in HP 48 format. 


YMD2DAT 95.5 Bytes Checksum #F806h 


year month day ~— date 


« 
IP Use only integer part of the day number 
IF -42 FS? Assert YYYY DD MM order 
THEN SHAP 
END 
166 7 + MM.DD (or DD.MM) 
SHAP 


DUP SIGN SHAP ABS Get sign of year and use absolute value 
1666668 - ROT + O0.00YYYY + MM.DD to get MM.DDYYYY 
¥ Multiply by sign of year 

% 


Example: 19945 18 45.18.1994 (flag -42 clear) 


DOW. The program DOW finds the day of the week given a date in 
HP 48 format, based on an algorithm in Practical Astronomy With Your 
Calculator, cited in the acknowledgments. 


DOW 167 Bytes Checksum #239Fh 


date > “day” 


DAT2ZYND Convert to year, month, and day 
JDAYN Calculate Julian day number 
1.5 + 7 « FP 7 * -1 RNP Find day number, 0 to6 
£ "Sunday" "Monday" 
"Tuesday" "Wednesday" 
"Thursday" "Friday" 
"Saturday" 3} 
SWAP 1 + GET Day of week from I to 7 
* 


Example: August 2, 1994 (8.021994) falls on Tuesday. 
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DAT2STR. The program DAT2STR converts a date in HP 48 format 
to a string in “MM/DD/YYYY” or “DD.MM.YYYY” format, 
according to the setting of flag -42. DAT2STR uses the program 
DAT2YMD. 


DAT2STR 272 Bytes Checksum #C8A0h 


date > “date” 


2 


RCLF 
STD 
“ 
GET 
IF DUP 9 > 
THEW we 
ELSE "g" 
END 
SWAP + ¢sep + 
ROT 
* 
+ flg Tostr 
< 
DAT2ZYMD 3 4LIST 
DUP DUP 
IF -42 FS? 
THEN 32 "." 
ELSE 2 3 "7" 
END 
+ month day ¢sep 
¥ 
month Tostr EVAL 
day Tostr EVAL 
HEAD + + 


* 
flg STOF 
» 


Save the system flags, set STD mode 
for number to string conversions 
Subroutine Tostr 

Get month or day from list 

If number is 2 digits 

then no leading 0, 

otherwise leading 0 required 


Convert to string, add separator 
Rotate next list into position 


Create { year month day } list 


Check flag -42 for separator chr 


Create MM/ (or DD.) string 
Create DD/ (or MM.) string 
Create YYYY string, add MM and DD 


Restore system flags 


Example: 4.161930 DAT2STR — “04/16/1930” (flag 42 clear). 
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Status Line Animation 

The HP 48 graphics display invites various forms of simple animations. 
The example SLICE is provided in the EXAMPLES directory when the 
TEACH command is executed. Two more are provided here for fun. 


TANK. The program TANK recreates a brief moment of Operation 
Desert Storm. This time, the battlefield appears to be the status area of 
the display, but is actually a copy of the stack display that is stored in 
an enlarged PICT. Comments appear after the @ character. Note that 
when you enter the program there is no gap between the characters of 
grob data in the command line. 


TANK 1334.5 Bytes Checksum #74C8h 


& 

{ 

GROB 16 10 0C1O00EFFOFFFOF708FF 14002CFF3A D67E6B5CFF3 
GROB 16 10 0C100EFFOFFFOF708FF 14002CFF36BD66BD6CFF3 
GROB 16 10 0C100EFFOFFFOF708FF14002CFF3E6B5AD67CFF3 
3 

t 

GROB 16 10 0830FF70FFE006CO8FF14002CFF3E6B5AD67CFF3 
GROB 16 10 0830FF70FFE006CO8FF14002CFF36BD66BD6CFF3 
GROB 16 10 0830FF70FFE006CO8FF14002CFF3AD67E6B5CFF3 
3 

GROB 7 2 a7er 


£ 
GROB 14 14 00000000000008308F708FE006C00000C3E02001 EFF 1D6B37BD2EFF1 
GROB 14 14 000000700FFOOFD 10C8100000000000000002001E1E1D2B37BD2EFF1 
GROB 14 14 OEF10EB3081300000000000000000000000000002001D0A370C2EFF1 
GROB 15 14 00360000000000000000000000000000000000000000100270C2E1E1 
GROB 15 14 0000000000000000000000000000000000000000000000004082E0C1 

3 
PICT RCL 
# Gd # Gd 


+ tankl tank2 shell blast pictsav x y 
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4 


IFERR @ Traps (CANCEL) key 

@ Enlarge PICT so tank can enter from left 
# 163d # 64d PDIM 

@ Put copy of stack display into PICT 
PICT < # 16d # @d } LCD? REPL 
@ Show PICT 

{ # 16d # Gd } PYIEW 

@ Clear the status area 

PICT ¢ # 16d # @d } # 131d # 14d 
BLANK REPL 

@ Advance tank from left onto battlefield 


FOR i 
PICT x # 4d 2 4+LIST tanki i GET REPL 
# id 'x' STO+ 
NEXT 
NEXT 
# 148d 'y' STO 
@ Advance tank from right 
112 
START 
13 
FOR i 
PICT y # 4d 2 +LIST tank2 i GET REPL 
‘'y' # id STO- 
NEXT 
NEXT 
@ Bang! The thunder of the battlefield ... 
266 .42 364 .62 BEEP BEEP 
@ Show the shell 
PICT ¢ # 47d # Sd 3 shell GOR 
31.115 
@ Move shell 
FOR i 
PICT i R#B # 5d 2 +LIST shell REPL 
4 STEP 
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@ Explosion 
15 
FOR i 
PICT ¢ # 114d # @d } blast i GET REPL 
460 i ~ .4@1 BEEP 360 i ~ .41 BEEP 
NEXT 
@ Delay 
@ (This is a good time to let MEM force garbage collection) 
MEM DROP 1 WAIT 
@ Move victorious tank off battlefield 
1 38 


FOR i 
PICT x # 4d 2 +LIST tanki i GET REPL 
'x' # 1d STO+ 


THEN @ End of IFERR trap 
END 
@ Switch back to the real stack display 
TEXT 
@ Restore original PICT 
Pictsay PICT STO 
* 
* 


TRAIN. The program TRAIN features a steam train complete with 
whistle and billowing smoke. Notice how the smoke dissipates! The 
smoke coordinates are saved on the stack, and cleared at random. Note 
that when you enter the program there is no gap between the characters 
of grob data in the command line. 
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TRAIN 911 Bytes Checksum #A7FDh 
& 


MEM DROP DEPTH 194 1 FS?C PICT RCL 

+ depth x fl pictsayv 

« 

#191d #64d BLANK 

{ #6@d #6d 3 LCD+ REPL PICT STO 

PICT ¢ #66d #6d + #13id #14d BLANK REPL 
{ #66d #6d 3 PYIEH 

WHILE x 

REPEAT 


PICT x R+B #fd 2 +LIST 
GROB 60 7 00E3000000000000E 163000000000000CC6 100CFFF8FFF30CFFS5F7C 
AAA8AAA20EFF7F7DFFBAFFF20FFFFFFFFFFFFFF70CCC 1630303060C00 


REPL @ Draw train 

IF RAND .23 > THEN @ 77% chance of clearing smoke 
IF DEPTH depth —- DUP @ If there’s smoke on the stack 
THEN RAND * ROLL PIXOFF @ then clear one smoke pixel 
ELSE DROP END 
END 

'x' 1 STO- @ Move train left one pixel 

IF 1 FS?C THEN @ If flag 1 set, emit additional smoke 

x #4d + #7d 2 +LIST PIXON 

x #6d + #5d 2 +LIST DUP PIXON @ Save on stack 

x #7fd + #5d 2 +LIST DUP PIXOH @ Save on stack 
EHD 

IF RAND .98 > x 68 > AHD @ 2% chance to blow whistle 
THEW 2112 DUP .28 BEEP .2 WAIT .4 BEEP 

EHD 

IF RAND .8 > THEN @ 20% chance of emitting smoke 

1 SF @ Request more smoke after train moves 

x #4d + #7d 2 4+LIST PIXON 

x #4d + #6d 2 4+LIST DUP PIXOW @ Save on stack 

x #5d + #6d 2 4+LIST DUP PIXON @ Save on stack 


EMD 
END 
DEPTH depth — DROPH @ Drop remaining smoke 
1 IF fi THEN SF ELSE CF EHP @ Restore flag 1 
TEAT pictsay PICT STO @ Restore original PICT 
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Customizing the Solver 

In Menus the options available for menu customization are described. 
You can create a fairly sophisticated calculating environment using 
custom menu definitions. While the HP 48G/GX models have HP’s 
best compound interest software built right in, the Time-Value-of- 
Money (TVM) application remains a classic illustration of what a 
custom menu definition can do. 


The programs TVMCALC, MNU%, and CHOS% mimic some of the 
most used functions in HP business calculators. Since many variables 
are used by the equations, you might wish to make a directory BCALC 
to hold your equations and variables. The programs MNU% and 
CHOS% illustrate two methods for selecting an application. To reduce 
directory clutter, these examples are written as single programs. 


Compound Interest Calculations. The program TVMCALC 
implements the classic equation for TVM calculations. The equation 
supports compound interest calculations for applications where 


identical payments occur over regular periods which coincide with the 
compounding periods. 


—-N 
Leer 
0= PV ver UR ry (42 


The variables are defined as follows: 
N The number of periods of the loan or investment. 


I The periodic interest rate. If the loan is stated as 8% per year, 
and payments are monthly, then /=.67. 


PV _ The present value of the loan or investment. In the case of a 
loan, this is how much you borrow. 


PMT The periodic payment. 


FV _ The future value of the loan or investment. The future value of a 
loan that is to be paid in full by regular payments is zero. 
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To make the calculations more applicable to the real world, three 
enhancements have been made to the basic equation: 


Payments can be made at the beginning or end of a period, so the 
variable PmtMode is used to indicate the mode. PmtMode is 1 if 
payments are made at the beginning of the period (called Begin 
Mode), or 0 if payments are made at the end of the period (called 
End Mode). 


In some loans or investments, payments are made on different 
schedules than one per month. Interest rates are usually quoted on 
an annual basis, so the variable /%YR stores the annual interest 
rate, and the variable PYR is used to adjust for the number of 
payments per year. 


The equation has been adjusted to let you enter the interest rate as a 
whole number, so you can enter 8 for 8% instead of .08. 


After these changes have been added, the equation becomes a little 
more complicated: 


-N 
1-(14 I%YR } 


* 
0 = PV+ 14. L2YR PmtMode P 100 * PYR 
100* PYR I%YR 
100* PYR 
-N 
+rv[1+ oe } 
100* PYR 


In TVM calculations money received is displayed as a positive number; 
money paid out is displayed as a negative number. The diagrams on 
the next page are called cash flow diagrams, and help to illustrate the 
flow of monies in a loan or investment. 
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The program TVMCALC embodies the entire equation and user 
interface into a single solver equation. When the equation has been 


FV=0 





Payments 
Loan From Borrower's Point of View 


Payments 





Loan From Lender's Point of View 


activated within the solver, the following menu keys are available: 


H 
Te 
F t 
PMT 
F ny 
MORE 


Store or calculate the number of periods of the loan. 
Store or calculate the annual interest rate. 

Store or calculate the present value. 

Store or calculate the payment. 

Store or calculate the future value. 

Display the option menu keys. 


The option menu keys do the following: 


BEG 

END 
Pav 
SHOW 
RESET 
EMIT 


Set begin mode. 

Set end mode. 

Store the number of payments per year. 
Display the values of all the variables. 


Clear N, I, PV, PMT, FV. Set 12 pmts/year and end mode. 


Return to the Solver menu. 
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The user interface is customized to mimic HP’s business calculators, 
and so has extra code for cosmetic purposes. One way this example 
could be streamlined would be to place the duplicated code that 
displays the payment mode and number of payments per year into a 
separate global variable. As you experiment with TVMCALC, you 
may wish to add or delete other features to see how they work. 


TVMCALC 1386 Bytes Checksum #350h 


cd 
£ 
'B=P¥+C14+1TXYR*PmtMode-¢ 16G#PYR) *PMT#¢C1- 
C1ItTIAYR/C1BBePYR3O*-NO 4 CIAYR/ C1 BGEPYR 93 
+FVECLFIAYR4¢C1GG2PYR99°-H' 
{ NM IXYR PY PMT F¥ 


< "MORE" 
« ¢ 
£ "BEG" & 
1 'PmtMode' STO 
"Begin Mode" 1 DISP 1 FREEZE 
* 
3 
£ u EHD" £ 
6 'PmtMode' STO 
"End Mode" 1 DISP 1 FREEZE 
* 
3 
C "PeYR" « 
'PYR' STO 
PmtMode "Begin" "End" IFTE 
" Mode" + 1 BDISP 
PYR " Payments¢Year" + 
2 DISP 1 FREEZE 
Es 
+ 
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€ "SHOW" « 


PmtMode "Begin" "End" IFTE 
" Mode" + 1 DISP 

PYR " Payments/Year" + 

2 DISP 


"H = " N+ 3 DISP 
"TAYR= "I + 4 BISP 
"PY = " PY + 35 DISP 
"PMT = " PMT + 6 DISP 
"FY = " FY + 7 DISP 
7 FREEZE 
% 
3 
{ "RESET" « 


6 'PmtMode' STO 

12 'PYR' STO 6 'FY¥' STO 

6 'PMT' STO 6 'P¥' STO 
B'IXYR' STO 46 'N' STO 
"End Mode" 1 DISP 

"12 Payments“Year" 2 DISP 
1 FREEZE 


3 
< "EXIT" « 
4 MENU 
PmtMode "Begin" "End" IFTE 
" Mode" + 1 DISP 
PYR " Payments-Year" + 
2 DISP 1 FREEZE 
Fs 
3 
3 
TMENU 
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PmtMode "Begin" "End" IFTE 

"Mode" + 1 DISP 

PYR " Payments/Year" + 2 DISP 1 FREEZE 

% @ End of program for MORE label 
+ @ End of MORE key definition 
+ @ Menu end 

+ STEQ 
6 'PmtMode' STO 12 'PYR' STO @ 'FY¥' STO 
6 'PMT' STO 6 'P¥' STO @ 'I“YR' STO G 'H' STO 
34 MENU @ Display the SOLVR menu 
"End Mode" 1 DISP 
"12 Payments/Year" 2 DISP 
1 FREEZE 
* 


The MORE key is implemented by taking advantage of the Solver’s 
variable list feature. The basic strategy is a heavily customized Solver 
equation list of the form: 


{ ‘equation’ { variable list } } 
Each entry in the variable list can be defined as a variable or as a list 
containing the label and one or more associated programs. For more 
details on menu key definitions, refer to the example MENUEX in 


Menus. 


To solve TVM problems, enter the values you know and solve for the 
unknown by pressing (4) followed by the appropriate key. 
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To try out an example, consider a loan for a car. The loan amount is 
$18,280, the annual interest rate is 13%, and the term is for four years. 
Payments are to be made monthly, so the number of periods (N) is 48. 
Assume the HP 48 is in FIX 2 display mode, and begin by executing 


TVMCALC: 
Keys: 
TMA 

48 H 

13 Tek 
18280 FY 


0 FY 
(Q) PMT 


Now press MORE 


n 
2 


FV 


Display: 

End Mode 

12 Payments-Year 
H: 48.06 

IXYR: 13.66 

PY: 18,286.64 
F¥: 4.68 

PMT: -496.41 


SHO to see all the values at once: 


ee ee 
3.00 
18286. 68 
-49 1 


Mod 
g 
= 4 
= 1 


PeeS PEND [Pcve [SHOM|RESET) EXIT | 


Example Programs 





105 


Percentage Calculations. The program MNU% consists of a 
custom menu definition containing four commonly used percentage 
equations, along with text to remind you which is which. The 
equations are: 





% change = Ae *100 
OLD 
% of total -( FORE 100 
TOTAL 

Markup as % of cost = (ee *100 
COST 

Markup as % of price = (et *100 
PRICE 


When you execute MNU%, the menu and prompts are displayed: 


Select a function: 


4CHG Percent change 
410T Percent of total 
MUxC Markup as % cost 
MU“P Markup as % price 


Pacha [ZTOTL| Musc(rMuxP] [| 





Pressing a menu executes the corresponding program in the menu 
definition, which loads the appropriate equation into EQ and starts up 
the solver menu. For instance, press #CHG_ to display the first 
equation: 


EQ: £ 'XCHG=CNEW-OLD .. 
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MNU% 683.5 Bytes Checksum #7905h 


x 
£ 
{ "4CHG" « 
{ '4CHG=CNEW-OLD>/OLD+166' 
£ OLD NEW “CHG } 
+ STEQ 36 MENU 
* 
3 
{ "4TOTL" # 
{ '4TOT=PART/TOTAL+#166' 
{£ TOTAL PART “TOT } 
+ STEQ 36 MENU 
» 
3 
{ "MUAC" « 
{ 'MxC=¢(PRICE-COST>/COST#166' 
{ COST PRICE MxC 3 
+ STEQ 36 MENU 
Fo 
3 
{ "MUXP" « 
{ 'MxP=C(PRICE-COST>/PRICE+#160' 
{ COST PRICE MxP 3 
+ STEQ 36 MENU 
*» F 
+ TMENU Displays menu 
CLLCD Clear display 
"Select a function:" 1 DISP Show options 
"CHG Percent change" 3 DISP 
"4TOT Percent of total" 4 DISP 
"MUXC Markup as “4 cost" 5 DISP 
"MU“P Markup as % price" 6 DISP 
3 FREEZE Freeze display 


& 


Once the equation has been initialized in the Solver, enter the variables 


you know, then press (4) and the unknown variable. 
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The program CHOS% uses a choose box instead of a custom menu to 
select an equation. The list supplied to the CHOOSE command 
consists of four lists, each containing a description to be shown in the 
choose box and the corresponding solver equation to be stored in EQ. 


CHOS% 521 Bytes Checksum #4015h 


« 
CLLCD 
"SELECT A FUNCTION: " Choose box title 
£ 
{ "Percent change" 
{ '4CHG=(NEW-OLD)/OLD#166' 
{ OLD NEW “CHG } 
3 
3 
{ "Percent of tot" 
{ 'XTOT=PART/TOTAL#166' 
{ TOTAL PART “TOT 3 
3 
3 
{ "Mkp as % cost" 
{ 'MxC=CPRICE-COST>-COST#166' 
{€ COST PRICE McC 3 
3 
3 
{ "Mkp as % price" 
{ 'M“xP=CPRICE-COST®/PRICE#1606' 
{ COST PRICE M“P 3} 
+ 
3 
3 
1 Choose highlight on Ist item 
IF CHOOSE If OE pressed... 
THEM 
STEQ Store equation 
36 MENU Display the solver menu 
END 
* 
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Amortization Plot 

Given a Time-Value-of-Money problem that’s been established in the 
TVM variables, the command AMORT may be used to calculate the 
amounts applied to principal and interest and the remaining balance of a 
loan after a given number of payments. With this function in hand, it’s 
interesting to plot the amounts applied to principal and interest over the 
life of a loan. 


The program AMPLT plots the amounts applied to principal and 
interest for each year of a loan using the following algorithm: 


° Calculate first year’s amortization data using PYR periods. 
¢ Store new balance back into PV. 


¢ Save amounts applied to interest and principal during the first year 
in variables int and prin. 


° For each year: 


© Calculate next year’s amortization data, update PV with new 
balance. 


® Duplicate the new values for int and prin. 


¢ Draw lines from last year’s int to this year’s int and last year’s 
prin to this year’s prin. 


© Update int and prin. 


MT 
ra 
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AMPLT 569.5 Bytes Checksum #C4EBh 


& 


a 


£ 


PICT PPAR } PURGE 


Purge PPAR and PICT 


CLLCD "Scaling ..." 1 BISP Display status message 
PY H PYR 4 
PYR AMORT 
'P¥' STO 
NEG SWAP NEG 


+ 
< 


a 
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PY years int prin 


1 years RNG 

® PMT NEG PYR * YRNG 
€1,;8> AXES 

1 16 PMT XPOW 1 + * 
2 +LIST ATICK 

< #6 #6 3 PYVIEW 
DRAX 

PICT 


Calculate number of years 


Amortize first year 
Store new balance in PV 


Principal and interest need to 
be positive for plotting 


Scale x-axis 


Scale y-axis 

Set axes intersection 

Set x, calc y-tick intervals 
Set tick intervals 

Show new PICT 

Draw axes with tick marks 


1 int RC C4+PX OBJ BROP Calculate coordinates for INT 


SHAP 3 + SWAP 5S - 2 4+LIST 


"IMT" 1 +GROB GOR 
PICT 


Put INT label into PICT 


1 prin R+C C4+PX OBJ+ DROP Calculate coords for PRIN 


SHAP 3 + SWAP 1 + 2 +LIST 


"PRIN" 1 4+GROB GOR 
2 years FOR yr 

PYR AMORT 

‘PY! STO 

HEG SWAP HEG DUP2 

yr SWAP R3C 

yr 1 - prin RFC 

LIWE 

yr SWAP R4C 

yr 1 - int RIC 

LINE 

‘prin’ STO 'int' STO 
HEXT py 'P¥' STO 
PICTURE 


Put PRIN label into PICT 
Loop for each year 
Amortize next year 

Save new PV 

Positive values for plotting 
New principal value coord. 
Old principal value coord 
Draw line 

New interest coord 

Old interest coord 

Draw line 

Update old prin & int 
Loop end, restore original PV 
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Pascal’s Triangle 
Pascal’s Triangle is the arrangement of rows of numbers where the nth 


n 


row consists of the binomial cofficients [ with r=0, 1, ...,. When 


* 
the numbers are displayed in rows centered about a vertical axis, you 


n+l n n : 5 i 
can see that = i +| |, which are positioned to the left and 
r r- r 


6 5 
right above it. For instance, ") is 15, which is the sum of ) , which 
5 eae 
is 5 and 4 which is 10. 


The HP 48 display can comfortably display the first nine rows of this 
arrangement. The program PASCAL on the next page generates the 
following display: 
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PASCAL 361 Bytes Checksum #D4E8h 


« 
x Subroutine DoNewRow 
{13 Initial value of new row 
+ prevrow newrow 
< 
1 prevrow SIZE 1 —- 
FOR r Loop for r subintervals 
"newrow' 
Prevrow r 
DUP 1 + SUB Extract elements 
OBJ>+ DROP + Add to form new element 
STO+ Add to end of list in newrow 
NEXT 
newrow 1 + Add trailing 1 
» 
* 
PICT RCL Save old PICT 
+ DoNewRow pict 
4 
PICT PURGE Purge PICT 
{ #6d #6@d 3 PYIEW Create and show new PICT 
£113 First row is { 1 1 } 
a) 
FOR n Loop for 10 rows 
PICT 
OVER 1 +GROB Create a copy of row as grob 
DUP SIZE DROP Find width of grob 
2 / 66 SWAP - Center the grob 
n #6d * Calculate row coordinate 
2 +LIST SWAP Combine coords into list 
REPL Place grob in PICT 
DoNewRow EVAL Calculate new row value 
HEXT DROP Complete loop, discard last row 
{ 3 PYIEW Show PICT, wait for 
Pict PICT STO Restore old PICT 
» 
* 
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Plotting Inequalities 

The program INPLOT plots the intersection of a series of two or more 
inequalities stored in a list in the reserved variable EQ. The equations 
must take the form y=f(x). The program assumes you have set the plot 
scale in PPAR. The program tests the midpoint of vertical lines drawn 
between the plot boundary and the functions to see if that point satisfies 
all inequalities. A status pixel blinks along the top of the plot to 
indicate the progress of the plot. 


The program clears flag —3 to assert symbolic results mode. Since at 


least two equations are being plotted, you might wish to set flag —22 to 
draw the equations simultaneously. 


Example: Plot the logical AND of the equations Y>SIN(X), 
Y<COS(X), and Y>.3*X. Store the following list in EQ: 

C 'YSSINCKD' 'Y<COSCKD' 'Y>.3#K' 3 
Assuming that Radians mode is set and PPAR contains the default 


scaling parameters, the program INPLOT may be used to produce the 
following plot: 
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INPLOT 753 Bytes Checksum #39D 1h 


s 


-3 CF RCEQ DUP SIZE 
IF DUP 2 < 

THEN DROP2 513 DOERR 
END 

{30 3 

PPAR 1 GET CR 

PPAR 2 GET CR 

OVER 5 PICK - 


Symbolic results 
Require at least 2 equations 


Values for neweqns and pts 
Xmin & Ymin 

Xmax & Ymax 
Calculate plot step size 


PICT SIZE DROP B3R 7 

> 

oldeqns numeqns neweqns 
pts xmin ymin xmax ymax 


step 

x 
oldeqns 1 Convert inequality into 
* OBJ+ DROP2 = * form y=f(x) 
DOLIST 


DUP 'neweqns' STO STEQ 
ERASE < #6 #6 > PYIEW 
DRAX DRAM 

oldeqns 1 

* OBJ+ DROP2 SWAP DROP » 
DOLIST 'neweqns' STO 


Store in neweqns and EQ 
Show PICT 

Plot equation lines 
Extract right side of eqns 


Store into neweqns 


xmin xmax Loop from left to right 
FOR x 
x ymax R+C DUP Coordinate of top pixel 
PIA? DUP2 Save coord & pixel state 
* PIXOFF # * PIXON # 
IFTE Toggle pixel 
x 'R' STO Update value of X 


Plot borders begin pts list 
Calculate function values 
Sort list into ascending order 
Save into pts 

Loop for each line segment 


ymin ymax 2 LIST 
neweqns 1 * 3NUM + 
DOLIST + SORT 
'pts' STO 

1 numegqns 1 + 
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FOR n 
Pts noni + SUB 
OBJ+ DROP 
BDUP2 + 2+ 'Y' STO 
IF 
1 1 numeqns 
FOR m 
oldeqns m GET 
3+HUM AND 
HEXT 
THEH 
x SWAP R4C x 
ROT R+C LINE 
ELSE DROP2 
EHD 
HEXT 
*« PIXON % « PIXOFF » 
IFTE 
step STEP 
PICTURE 
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Extract segment endpoints 
Calculate midpoint 

Loop for each equation 
Test inequality, accumulate 


into number on stack 


Draw segment if true for 
all equations 
Otherwise discard points 


End of segment loop 
Restore status pixel 


End of plot loop 
Display PICT 
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Brownian Motion 

The Scottish biologist Robert Brown (1773-1858) first observed that 
tiny particles in a liquid suspension make small, erratic movements. 
This motion (later dubbed Brownian Motion) results from motion and 
collisions at a molecular level that are proportional to temperature. 
Two examples are presented here that illustrate Brownian motion. 


A Brownian Line. Brownian motion in one dimension can be 
illustrated with a Brownian line. As a line is drawn from left to right, a 
random incremental vertical step is taken. Each point P, along the line 
is defined as P,_1+S#(RAND-.5), where S is a suitable scale factor and 
RAND is a random number between 0 and 1. 


The line could represent the landscape elevations on a straight line 
between two cities. The line could also represent the cumulative 
fortunes of two people gambling with each other — “up” motions 
represent a win for one player, “down” motions represent a win for the 
other player. Sometimes one player will do very well, sometimes very 
poorly. 


MEAM = -7.1661193341BE-2 
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Over the long run, the line should hover around the axis. The program 
BROWNLN draws the line, uses the statistics matrix XDAT to 
accumulate the values, calculates and displays the mean. 


BROWNLN 285 Bytes Checksum #AB17h 


< 
PICT PURGE 
< #6 #6 3 PYIEW 
€@,-1)> PMIN ¢136,1> PMAK 
€6,6> €136,0>) LINE 
CLE 
4 
4 134 
FOR x 
RAHD .5 - .15 * + 
DUP =+ 
x OVER R+C PIXON 
HEXT DROP 
PICT < #6 #6 3} 
"MEAN = " 


MEAN + 1 +GROB 
REPL 
{ 3 PVIEW 
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Purge existing PICT 

Create and show default PICT 
Establish scale (131 pixel width) 
Draw axis 

Purge existing DAT 

Starting value 

Loop from left to right 


Calculate new value. S=.15. 
Accumulate new value in DAT 
Turn on pixel 

End loop, drop final value 
Coordinates for mean 


Calculate mean, convert to grob 
Place mean into PICT 
Show PICT, wait for (CANCEL 
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A Random Walk. Brownian motion in two dimensions can be 
illustrated with the classic example of an intoxicated person starting in 
the middle of a large parking lot. From a starting position, each step is 
taken in a random direction. The distance from the starting position is 
proportional to the square root of the number steps taken multiplied by 
the step size. 


To calculate the position of step n in Cartesian coordinates, generate a 
random number d between 0 and 360. Then: 


X,=Xp_1+COS(d) Y,=Y,_1+SIN(d) 


RANWALK 183 Bytes Checksum #1D52h 


x 


PICT PURGE Purge existing PICT 
{ #6 #6 3 PYIEW Create and show default PICT 
DEG Assert degrees mode 
€-32.5;-15.5) PMIN Scale PICT 
€32.5,;16> PMAX 
44 Initial values for X and Y 
4 256 
START Loop for 250 steps 
RAND 366 * Random direction d 
SWAP OVER SIN + Add sin(d) to Y 
SWAP COS ROT + Add cos(d) to Y 
SWAP DUP2 R+C PIXON Turn on pixel 
HEXT DROP2 End loop, drop X and Y 
{ 3 PVIEW Show PICT, wait for 
* 
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Entropy 

Entropy is a measure of disorder in a system, and must increase over 
time as stated by the second law of thermodynamics. An elegant 
illustration of this is the classic picture of a box divided into two halves 
by a removable partition. The free expansion of a gas from the left half 
across both halves when the partition is removed is a good example of 
an irreversible process in which the entropy has increased. 





Initial Conditions Final Conditions 


The progress of the system can be simulated in the HP 48 graphics 
display. Two programs are presented — one shows the proportion of 
molecules on each side as a function of time, the other shows the box 
itself. 


Proportion Over Time. The program ENTROPY plots the 
proportion of gases between two sides of a box over time after the 
partition has been removed. The horizontal axis will represent time 
starting at the left and the vertical axis will show the proportion of 
molecules on each side of the box. The initial conditions state that 
there are 64 molecules one side of the box. For each time that a 
molecule croses the midline of the box the probability Pp_,, that a 
molecule will cross from the right side to the left side is given by 
N,/(NL+Npr)*RAND, where Ny is the number of molecules on the left 
side, Np is the number of molecules on the right side, and RAND 
returns a random number between 0 and 1. 


For each crossing, the ratio is compared to a new random number 


between 0 and 1, and if the random number is greater than the ratio, a 
molecule is said to move from right to left. 
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ENTROPY 247 Bytes Checksum #62EBh 


x 


PICT PURGE 
{ #6d #6d 3 PVIEW 


» 


1 


(8,13 PMIN 
€136,64) PMAX 
€@;32) (136,32) LINE 


RAND OVER 64 / 

IF < 

THEN 1 - 

ELSE 1 + 

END 

x OVER R+C PIXON 
NEXT DROP 
{ 3 PYIEW 


20 


Purge existing PICT 
Create and show default PICT 
Scale PICT 


Draw midline 
Initial number of molecules on left 
Loop for 130 crossings 


Calculate left/right ratio 

If ratio is less than random number 
Then one molecule moves right 
Otherwise one molecule moves left 


Show proportion 


Loop end, drop final value 
Display PICT, wait for 
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Gas Simulation. The program FREXP sets up the initial conditions 
for the experiment. The program begins by drawing 80 molecules, 
beeping, and waiting for a key: 





Now begin the experiment by pressing a key. The molecules will begin 
to move from one side to the other. The program runs until you press a 
key. 





The WHILE loop in the program continues until a key is pressed. 
During this time, the state of the system is represented by lists of 
molecule coordinates for the left and right sides of the box in stack 
levels 3 and 2, and the count of molecules on the left side in level 1. 
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FREXP 723.5 Bytes Checksum #3DC1lh 


x 
86 PICT RCL 3n pictsay 
¥ 
#131id #64d BLANK PICT STO 
{ #6d #6d 3} PYIEW 
{ #6d #6d 3 { #136d #63d 3 BOX 
£ #65d #6d 3 < #65d #63d 3 LINE 
1 mn START 
RAND 63 * 1 + R3B 
RAND 66 # 1 + R3B 
2 3LIST DUP PIXON 
HEXT n #LIST 
446 .1 BEEP @ WAIT DROP 


{ #65d #20d 3 € #65d #43d 3 TLINE 


{3m 
WHILE KEY HOT 
REPEAT 
IF DUP n /“ RAND > 
THEH 
1 - 3 PICK 1 GET PIXOFF 
RAND 63 ¥ 66 + RIB 
RAND 66 * 1 + R3B 
2 3LIST DUP PIXON 
ROT SWAP 1 4LIST + SWAP 
ROT 2 OVER SIZE SUB 3 ROLLD 
ELSE 
1 + SWAP DUP 1 GET PIXOFF 
2 OVER SIZE SUB SHAP ROT 
RAND 63 # 1 + R4B 
RAHD 66 * 1 + R+B 
2 3LIST DUP PION 
1 LIST + 3 ROLLD 
EMD 
EMD 
4 DROPH TEXT pictsayv PICT STO 
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Save PICT 


Blank PICT 
Show PICT 
Draw box 
Partition 
Setup molecules 
X coordinate 
Y coordinate 
Turn on pixel 
Left list created 
Wait for key 

Open partition 
Right list, left count 
Run until key hit 


If left—right 


Turn off pixel 
Create new location 


Turn on new pixel 
Store in right list 
Subtract from left 
Otherwise right—left 
Turn off pixel 
Subtract from right 
Create new location 


Turn on new pixel 


Add to left list 


Clean up 
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Chaos 

In the Brownian line example, we observed a system which is fairly 
predictable — the results of successive iterations over time live in a 
known range. There are functions whose domain and range live in the 
same finite interval whose behavior is sensitive to initial conditions. 
Sensitivity to initial conditions can be defined by stating that within the 
domain of a function f the difference between f(x) and f(x+A) after n 
iterations exceeds some critereon €. 


Sensitivity to initial conditions can be illustrated with the baker’s 
function B: 


2x for O<x<.5 
2x-1 for .5<x<l 


a)={ 


Plotting the Baker’s Function. The program BAKER plots 
successive iterates of B from left to right on a vertical scale from 0 to 1. 
The following plots illustrate that the behavior of the baker’s function 
can be periodic or apparantly random, depending on the initial value. 


BAKER'S FUNCTION 


INITIAL YALUE= .2 


BAKER'S FUNCTION 


~ 


IMITIAL VALUE= .0311 





There is a hazard to putting too much faith in the plots for a large 
number of iterates. For instance, an initial value of 1/3 yields the 
sequence 2/3, 1/3, 2/3, 1/3, etc. Rounding errors can yield problems as 
illustrated on the next page. 

Example Programs 123 


BAKER'S FUNCTION 





IMITIAL YALUE= .333333333333 


BAKER 454.5 Bytes Checksum #304Fh 


s 


PICT PURGE Purge existing PICT 
{ #8d #@d 3 PYIEW Create and show default PICT 
€1,;-.15) PMIN Scale PICT 


€131;1.152 PMAx 
PICT ¢ #34d #@d 3} 
"BAKER'S FUNCTION" 


1 +GROB Create title grob 
REPL Display title 
{ #0d #6d 3 € #136d #6d 3 Coordinates for top line 
LIWE Draw top line 
{ #@0d #57d 3} 
{ #136d #57d 3 LINE Draw bottom line 
PICT & #8d #59d 3 Coordinates for value 
"THITIAL VALUE= " 
4 PICK + 
1 +GROB Create value grob 
REPL Display value grob 
1 131 FOR n Loop for 131 iterations 
IF DUP .5 # Baker’s function 
THEN 2 * 
ELSE 2 #1 - 
END 
n OVER R+C PIXON Display pixel 
HEXT DROP End loop, drop final value 
{ 3 PVIEW Show PICT, wait for (CANCEL) 


2 
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Comparing Iterates of Baker’s Function. To illustrate the 
sensitivity of initial conditions, use the program BAKDIFF. Starting 
with two initial values x and y, B(x) and B(y) are computed at each 
iterate n, and the difference between the iterates is calculated. If the 
difference exceeds the value €, a line is drawn and n is displayed. The 
value for € is defined as .5 and stored in local variable e€. 


Use BAKDIFF to compare the iterates of x=.222 and y=.2221: 


wee Y= 2221 





Sometimes the differences do not exceed your critereon for €, but you 
still can’t reliably predict a value for B,(y) based on B,(x): 


w= 001 Y= .002 
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BAKDIFF 706 Bytes Checksum #2B3Fh 


4 


PICT PURGE 
{ #6d #@d 3 PYIEW 


€1,-.15) PMIN 


€131,;1.15) PMAX 
& 


IF DUP .5 4 
THEH 2 ¥ 
ELSE 2#1- 
END 


> 


+x y baker é€ 
& 


{ #@d #6d 3} 

{ #136d #6d 3 LINE 
PICT ¢ #6d #@d } 
"Y= ye + 

u Y= " + y + 

1 +GROB 

REPL 

{ #@d #57d 3} 

€ #130d #57d 3 LINE 
PICT € #6d #59d 3} 


FOR n 

x baker EVAL 
DUP 'x' STO 

y baker EVAL 
DUP 'y' STO 

- ABS 

n OVER R3+C PIXON 
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Purge existing PICT 


Create and show default PICT 


Scale PICT 


Baker’s function 


Value for € 


Draw top line 


Coordinates for initial values 


Build initial value string 


Convert to grob 
Display value grob 


Draw bottom line 
Coordinates for € 

Build € string 

Convert to grob 

Display € 

Use flag 1 for line control 


Loop for 131 iterations 
Calculate B(x) 

Store new value for x 
Calculate B(y) 

Store new value for y 
Calculate difference 
Display difference 
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IF 1 FC? If no line has been drawn 


THEN Then check against € 
IF € > 
THEN 
mn @ R+C n 1 R+C TLINE Draw line if € exceeded 
1 SF Set control flag 
PICT < #166d #59d } Coordinates for n 
"Ni "on + Build string forn 
1 +GROB REPL Convert to grob and display n 
END 
ELSE DROP Discard difference if line drawn 
END 
NEXT End of iteration loop 
{ 3 PVIEW Display PICT, wait for (CANCEL) 
% 
1 CF Clear control flag 


2 


Chaotic Orbits. A model of a particle in a chaotic orbit may be 
easily programmed on the HP 48. The HP 48 program ORBIT was 
inspired by the program MIRA in the book Fractals by Hans Lauwerier 
(cited in the acknowledgments). The successive iterates are calculated 
by: 

Xnt1 = Yn — F(Xn) 


Yast = —bxX_ + F(Xn41) 
where: 


2(1— a)x ? 


F(x )=ax+ 5 


1+x 


The value for a controls the chaotic behavior (orbits are stable when a 
is 1). The value of b controls the spiral nature of the orbit. If b is just 
slightly less than 1, the orbit spirals inward. 


Ordinarily one might expect that the display of the HP 48 is too small 
to yield interesting pictures from chaotic functions, but careful selection 
of initial conditions and scaling parameters can yield many interesting 
pictures. 
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ORBIT takes the number of iterates n, initial values for a and b, the 
starting position x and y, and scaling coordinates from an input form. 


ORBIT 528.5 Bytes Checksum #8A6Eh 


4 
"ORBIT PARAMETERS" 


£ u ITERATES: u £ H "As u "Bs u Wye u uve u" 
"PMINS" "PMARE" 3 € 2 6 
{6666 6 ¢@;6) (6,63 3 DUP 


IF INFORM 
THEN 
OBJ+ DROP 
PICT PURGE 
{ #6d #6d 3 PYIEW 
PMAX PMIN 
25 PICK 2 # - 
3 PICK SQ DUP 
3 PICK * 
7 PICK 6 PICK # + 
SWAP 1 + “ @ 
e+abxuyucudz 
& 
4 SWAP 
FOR n x 
IF n 16 > 
THEN DUP y R#C PIXON 
END 
'z' STO 
by ¥uwt 
DUP 'x' STO 
a OVER * SWAP SQ 
DUP c * SWAP 1 + + + 
DUP 'w' STO 
zo 'y' STO 
HEXT 
& 
< 3 P¥VIEW 
EWD 
& 
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Purge existing PICT 

Create and show default PICT 
Scale PICT 

Calculate intermediate value 
Calculate inital value for w 


Create local variables 
Loop for n iterations 


Plot only after Ist 10 points 
Set pixel at (x,y) 


Save old x inz 
Calculate new x 


Calculate new w 


Complete new value for y 
Save y 


Show PICT, wait for (CANCEL 
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To get acquainted with ORBIT, begin with a somewhat stable orbit: 


| n {| a {| b {| x | y {| PMIN | PMAX | 
| 700 | 95 | i ft oO [7.5 | 25-10) | 27,10) | 


The value of a controls the chaotic behaviour of the orbit. Reduce a to 
see its effect on the orbit and adjust the scale to keep the picture large: 


pon | a | b | x | y | PMIN | PMAX | 
| 700} 9 [| i fo [75 | 20-8) | 22,8 





Now reduce b very slightly to make the orbit spiral inward: 


pon {| ia {| b {| x | y {| PMIN | PMAX | 
[2200] 9 | 998 | 0 | 7.5 | 20-8) | (22,8) _| 
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Now try something completely different: 





or: 


sie a 


ad oe 
Roe” 





Here’s some more to try. Remember that very small variations in 
initial conditions can result in dramatic changes to the orbit. For 
instance, try the second example in the table below with values for a of 
—.24, —.25, and —.26. 


Po [a [6 [x Ty | PMIN | PMAX, 
Ps00f —05 [985 [9.8 [0 [Cp [a7 | 
tooo = 24 [998 3 [0 | 2-10) | 04.10) | 
Proof 2 Pt far Jo | 20-16) [22.17 | 
P aoof 3 Pr fs [0 35-19) [5.199 | 
P soot 4 Pr os T e3-8) T0638) | 
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Fractal Trees 

The program TREE draws a fractal tree in PICT. This program was 
adapted from a program written by Carlos Talbot. The use of global 
variables for subroutines was changed to use local variables, and an 
INFORM command is used to obtain the plot parameters. The program 
continues until you press (CANCEL) in the input form. The tree 
parameters are maintained after the tree is drawn so you can remember 
the parameters used or change one to see how the tree is affected. 


There are six parameters to TREE. 


Left « A number from | to 5 that controls the length of left 
branches. 


Right & A number from 1 to 5 that controls the length of right 
branches. 


Left Z Controls the angle of left branches — larger angles produce 
greater curvature. 


Right Z Controls the angle of right branches. 
Height The height of the tree trunk in pixels. 


Levels The number of recursion levels. It’s best to start out with a 
small number to see how the tree begins to appear, then add 
additional levels “‘to taste’’. 


The tree below was drawn with the following parameters: 


Lefta_| Right | Left2 | Right 2 | Height | Levels | 
ea es a a a 
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Here’s some more sample trees to “grow” in your HP 48 display: 


Fractal Tree Samples 


1 et ra | Tet 2 bon 2 sight aes 
ae 


‘0 





The program TREE has three small “subroutines” stored in the local 
variables <-Dline, <-Point, and <-Generate. These subroutines share 
data with the main program via the stack and compiled local variables. 


TREE 2112 Bytes Checksum #6A4h 


& 
CLLCD 
(660666 }3 
WHILE 
"FRACTAL TREE" 
t 
{ "LEFT at" "ENTER LEFT «" @ 3} 
€ "RIGHT «&" "ENTER RIGHT «" @ 3 
{ "LEFT <5" "ENTER LEFT «<" 6 } 
{ "RIGHT 4?" "ENTER RIGHT «<" 6 > 
€ "HEIGHT!" "ENTER TRUNK HEIGHT" 6 > 
{ "LEVELS!" "ENTER RECURSION LEVELS" @ 3} 
3 
C223 
4 ROLL DUP INFORM 
REPEAT 
DUP OBJ+ DROP 
* @ <Dline 
4 
65 ROT + R3B 32 ROT — R3B 2 4LIST 
ROT 65 + R#B 32 4 ROLL —- R#B 2 4+LIST 
LINE 
% 
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* @ <Point 
+ xl yl x2 y2 
« 
IF 'x2-x1==6' 
THEN 
IF 'y2>yl' 
THEN 96 ELSE 274 
END 
ELSE 
y2 yl - x2 xl - - ATAN 
37.29577T95131 * 
END 
IF 'x1>x2' THEN 186 + 
END 
* 
* 


* @ «Generate 
66+ x y height angle level xi yl 
« 
x '¢turtx' STO 
y '¢turty' STO 
height ‘'¢turtr' STO 
‘eturtx' ¢turtt 1.74532925199E-2 + 
CoS ¢turtr * STO+ 
‘eturty' ¢turtt 1.74532925199E-2 + 
SIN ¢turtr * STO+ 
€¢turtx 'x1l' STO 
€¢turty ‘yl' STO 
‘level' 1 STO- 
x y x1 yl ¢Dline EVAL 
IF 'level>@' 
THEN 
xy x1 yl ¢Point EVAL '¢turtt' STO 
‘eturtt' ¢lfang STO+ 
€turtx ¢turty ¢lhf 
height * ¢lfang 
level ¢Generate EVAL 
x y x1 yl ¢Point EVAL ‘¢turtt' STO 
‘eturtt' ¢rtang NEG STO+ 
x1 yl ¢lhf height ¥* ¢rtang 
level ¢Generate EVAL 
END 
* 
* 
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466666 46 6 -36 6 &@ RCLF 

> 

tlfalp ¢rtalp ¢lfang ¢rtang 

theight level 

¢Dline ¢Point ¢Generate 

€turtt ¢turtr ¢turtx ¢turty 

elhf ¢rhf x y xl yl flags 

« 
-3 SF RAD 
# 131d # 64d BLANK PICT STO 
{ # Gd # Gd 3 PYVIEW 
‘elhf=2*¢-2-¢3#¢lfalpo>' DEFINE 
‘erhf=2*¢-27C3#¢rtalp)>' DEFINE 
xy xl y ¢height + ¢Dline EVAL 
xy xl y ¢height + ¢Point EVAL 
‘eturtt' STO 
‘eturtt' ¢lfang STO+ 
xl y ¢height + ¢lhf ¢height * 
tlfang level ¢Generate EVAL 
xu xl y ¢height + ¢Point EVAL 
‘eturtt' STO 
‘eturtt' ¢rtang NEG STO+ 
xl y ¢height + ¢rhf ¢height * 
értang level ¢Generate EVAL 


{ 3 PVIEW 
flags STOF 
* 
*» EVAL 
END 
2 
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Julia Sets 

To display Julia sets the program JULIA calculates a non-attracting 
fixed point zg for a starting position, then calculates preimages of the 
function f,(z)=z2+c. The fixed point is calculated by first examining 


r +V1- 4c|. If this value is greater than 1, then the fixed point is 
1--V1-4c 1+V1-4c 


Zo = ————__ otherwise z, = 
2 2 
The preimages of z, are+,/z,,,-c . As the program iterates, the 


preimages are randomly selected, and the resulting image shows points 
on the Julia set. This calculation method has the advantage of being 
small and reasonably efficient, and so is well suited to the HP 48, but 
you may notice differences with pictures resulting from other methods. 


JULIA 206 Bytes Checksum #B5B9h 


n (XY) (Xmin-Ymin) (Xmax-Ymax) > 


x 
PICT PURGE Purge existing PICT 
{ #6 #46 3 PYIEW Show PICT 
PMAX PMIM Scale PICT 
t+nc 
x 
1Yc4*#-JY1 + Calculate zg 
DUP IF ABS i £ 
THEW 2 —- NEG 
END 2 
1 n START Loop for n iterations 
c-J Calculate preimage 
IF RAND .5 < THEN WEG EHD = Randomly use —preimage 
DUP DUP PIXON Show new point and 
HEG PION its mirror image 
HEXT DROP 
{ 3 PYIEW Show PICT, wait for (CANCEL) 
* 
» 


Idea: Modify this program to use INFORM. 
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Some examples: 


| n | ic | PMIN | PMAX 
1.5,1 





pon | ic |  PMIN__|_ PMAX 
.11,.66) | (—3.5,-1.25) | (3.5,1.25 





pn | ic |  PMIN__|_ PMAX 
150 —2.75,-1:25) | (2:75,1.25 
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The Mandelbrot Set 


The Mandebrot set is the set of complex numbers c in the complex 
plane for which the sequence z,41=Zn2+c is bounded. The HP 48 is not 
well-suited to displaying the Mandelbrot set, but a crude approximation 
can be created with the program MANDEL. There are many 
algorithms for this problem. In MANDEL, the bound is calculated as 


1+,/1+4]c| 


p) 


and 15 iterations are taken to test whether the sequence remains within 
the calcuated bound. Since the Mandelbrot set is symmetric around the 
x axis, the upper half of the plot is calculated and the points are 
reflected below the axis. To speed up the process, a line from (—1.95,0) 
to (—.12,.99) is used as the left boundary for iterates in x. The 
equation xjeg=(y—1.0655)/.5464 defines the left border for each row of 


values to be calculated. The program can run for up to 20 minutes. 





To “zoom in” on a small area requires more effort and is considerably 
slower, because you can’t take advantage of symmetry about an axis. 
A program that will do this is left an an exercise for the user and the 
HP 48’s batteries. 
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MANDEL 390 Bytes Checksum #DFFAh 


a4 


PICT PURGE 


€-35-1.2) €15;1.23> PDIM 


{ #6d #6d 3 PVIEW 


1 CF 8 .96 


FOR y 


4 1.86655 - .5464 - .6 
FOR x 
x y RFC 
DUP ABS 4 ¥ 1+ 7 
1l+t+e2r 
6,6) 115 
FOR n 
IF DUP ABS 3 PICK > 
THEN 1 SF 99 'n' STO 
ELSE SQ 3 PICK + 
END 
HEXT DROP2 
IF 1 FC?C 
THEN 
DUP PIXON CONJ PIXON 
ELSE DROP 
END 
63053 STEP 


.43796 STEP 


{ 3 PVIEW 
» 
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Purge existing PICT 

Scale PICT in user units 
Display PICT 

Initialize signal flag; loop 0-.96 


Calculate range for loop 


Generate c 
Calculate bound 


Z0 

18 iterations 

If bound exceeded 

Then set flag, terminate loop 
Else calculate next iterate 


Discard iterate, bound 
If bound was exceeded 


Set pixels 


Show PICT, wait for (CANCEL 
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System Programming 


This chapter provides a limited introduction to the potential benefits of 
using some of the underlying system resources in your programs. It is 
beyond the scope of this handbook to present a complete description of 
all the resources available. Additional documentation and internal 
development tools are provided by both Hewlett-Packard and other 
third-party vendors. The Hewlett-Packard bulletin board (listed in the 
HP 48 User’s Guide) is one place to find further information. 


User-RPL vs. System-RPL 

The kernel of the HP 48 operating system/language known as RPL has 
been written in assembly language, and much of the functionality in the 
HP 48 is implemented in what is sometimes called “System-RPL”. 
Programs entered from the keyboard of the HP 48 are written in what is 
sometimes called “User-RPL”. 





:: System-RPL ; 
Assembly Language Kernel 


Programs written in User-RPL and System-RPL share the same 
resources, stack, etc. The commands available in User-RPL represent a 
subset of the functionality available in System-RPL. 





From a practical point of view there are three main distinctions between 
User-RPL and System-RPL. First, User-RPL commands have names 
that are recognized when you enter them into the command line, 
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whereas System-RPL objects must be accessed via the SYSEVAL 
command. Second, User-RPL commands have extra code responsible 
for validating input arguments (and thus require a bit of extra execution 
time), whereas programs written in System-RPL have no error 
protection. This layer of protection insures that invalid input arguments 
do not result in undesirable behavior by underlying code. Finally, there 
are more resources available to System-RPL programs. 


SYSEVAL & Version Identification 

The command SYSEVAL is the “doorway” to System-RPL objects. 
This command accepts a memory address formed as a user binary 
integer and evaluates the object at that address. If the address is 
incorrect, the HP 48 will likely “hang up” or lose memory. As you 
experiment with System-RPL objects, you may wish to define user 
programs that perform common System-RPL tasks. This chapter 
includes an assortment of small user programs to help you along. 
Frequent backups of memory are also a good idea. 


The HP 48G/GX command VERSION returns the version of the 
operating system and a copyright message. To identify the version of 
the operating system on any HP 48, use the command SYSEVAL to 
execute the internal object VERSTRING. To do this, place the user 
binary integer #34794h (the address of VERSTRING) on the stack 
and evaluate SYSEVAL. The result is a string in the form "HPHP48- 
A". The last letter represents the version of the operating system. The 
following program returns a string in level 2 containing the letter 
representing the operating system version, and 0 in level 1 if the 
calculator is a HP 48S/SX or a 1 if the calculator is a HP 48G/GX: 


GETVER 54.5 Bytes Checksum #6452h 


— “version” T/F 


x 
#30794h SYSEVAL Get the version string 
8 3 SUB Extract the last character 
DUP "J" > Duplicate and compare to “J” 
* 
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It is important to remember that SYSEVAL is a command like any 
other, and saves its last argument (if flag —55 is clear), not the 
arguments processed by the system object. 


The Dangers & Benefits of System-RPL 

The danger of supplying improper arguments to a System-RPL object 
can be gently illustrated with the multiplication function. In User-RPL 
executing the program * 2 "JAMES" * » results in the error Bad 
Argument Type. If you place the arguments 2 “JAMES” on the stack 
and execute #2A9BCh SYSEVAL (the System-RPL object %* for real 
number multiplication) you get an unexpected result: 
-1.66916683E16. In this instance the operating system remained 
intact — the multiply code actually interpreted the data located at the 
string “JAMES” as a number. The usual result for errors resulting from 
the improper application of System-RPL objects is the total loss of 
memory. 


Applications written entirely in System-RPL can achieve greater 
performance with a wider set of resources at the risk of being 
completely responsible for error trapping. That level of implementation 
is beyond the scope of this chapter. However, some applications may 
benefit from a limited use of System-RPL objects. In this chapter a 
series of objects will be presented which may be viewed as an 
additional “toolbox” for your programming efforts. 


Assumptions in This Chapter 

There are two basic assumptions underlying the examples in this 
chapter. First, the HP 48 is in HEX mode (the base mode affects the 
display of internal binary integers and checksums), and second, you 
have backed up your HP 48. 


Fixed Entry Points 

There have been many versions of the operating system software for the 
HP 48 calculator since its original introduction in 1990. With the 
exception of the dramatic changes embodied in the HP 48G and 
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HP 48GX models, the operating system has remained fairly stable. In 
order to produce a program that is guaranteed to run on all models of 
the HP 48, the use of System-RPL objects should be restricted to those 
objects whose location has remained stable. Objects reside at a specific 
address in memory, often known as an entry point. It should be 
obvious that robust programs should be able to run on all versions of 
the HP 48. A program that works on only one version of the HP 48 
operating system can generate a “Memory Lost” error when distributed 
to a wide audience, because there is no guarantee that all users will 
have the same version of the operating system. Hewlett-Packard’s list 
of fixed entry points represents the only known list of entries that have 
not changed since the first version of the HP 48 was introduced. The 
objects listed in this chapter are a small subset of that list, and are 
intended to expand your programming “toolbox”. 


'! WARNING !! 


The objects presented in this chapter are not supported by 
Hewlett-Packard and must be used carefully. Please do not 
contact either Hewlett-Packard or the author for further 


technical advice on the use of these objects or other aspects of 
System-RPL programming. Neither the author nor Hewlett- 
Packard take any responsibility for improper use of system 
commands that may result in loss of data or damage to your 
calculator. 





Examples in this Chapter 

The example programs in this chapter are small, and intended to be 
“building blocks” for larger applications. Some example programs call 
other example programs. The example programs COERCE and 
UNCOERCE are called most frequently. When an example program 
calls another example program in this book, the program name will be 
printed in bold. For instance, the program ¢ 3 + FRED 2 ¥ * calls 
the example program FRED. Each program is documented with the its 
size in bytes and a checksum value. When you enter the example 
program into your HP 48, use the command BYTES to verify that you 
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have entered the program correctly. BYTES returns the size of the 
program and a checksum, which should match the checksum printed in 
this book. The checksum comparison is especially useful for making 
sure you’ve entered addresses of System-RPL objects correctly. 


Type Checking. Some example programs in this chapter contain 
extra type checking code that is not absolutely required if you never 
make mistakes. The program CHKARGS has been included to provide 
a general argument checking mechanism. This approach has been 
taken to let you experiment with system programming with some 
reduced risk. Experienced programmers may wish to remove the type 
checking to improve program performance. 


Naming Conventions 

Some System-RPL objects have names given by Hewlett-Packard that 
contain more than 8 characters. Example programs that use System- 
RPL objects have been given names that reflect the System-RPL object 
being demonstrated where possible. Sample program names have been 
chosen to make the programs distinct within the HP 48 VAR menu and 
readable in a DOS directory. 


Hewlett-Packard uses special symbols to distinguish object types in 
names and stack diagrams. Some common symbols are listed below: 


Internal binary integer 
Real number 
Extended real 
Complex number 
Extended complex 


String 

Character object 

User binary integer 

Name 

List 

Composite object (list, program, unit, etc.) 5, 8,9, 13 
Program 
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Checking Arguments 

The protection code for User-RPL command and functions validates the 
number and type of input arguments. If an application is going to 
accept input from an inexperienced user, it may be safer to check the 
arguments before they’re supplied to unprotected System-RPL objects. 


The program CHKARGS takes a list in level one that contains type 
numbers for each required stack argument. The first number in the list 
specifies the desired type for the object in stack level 1, the second 
number specifies the desired object type for level 2, and so on. For 
instance, if a string is required in level 2 and a real number is required 
in level 1, the input to CHKARGS would be the list { 0 2 }. 


For a list of object types and their type numbers, see Object Types. 


CHKARGS 151.5 Bytes Checksum 3981h 


Objn ... obj, { type, ... typen } > 


« 
DUP SIZE + types n 
« 
IF DEPTH n ¢ Verify # of args 
THEN 3513 DOERR 
END 
1 on FOR i Loop for each argument 
i PICK TYPE types i GET Get ob type, req’d ob type 
IF # THEN 514 DOERR END ~ Error out if not the same 
NEXT 
* 
% 
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Binary Integers 

There are a number of object types used by System-RPL objects which 
are not available in the User-RPL environment. The most prevalent of 
these is the internal binary integer. Internal binary integers (sometimes 
nicknamed bints) are unsigned 20-bit quantities that are useful for many 
functions. These integers differ from user binary integers, which are 
actually stored internally as hex strings. To avoid confusion, this 
chapter will use the terms user binary integer and internal binary 
integer. While user binary integers (object type 10) are displayed with 
a leading # character, internal binary integers (object type 20) are 
displayed within <> symbols. A trailing character indicates the base 
display mode. For instance, if the base mode of the HP 48 is binary, 
then the internal binary integer 5 would be displayed as <1@1b>. 


Internal binary integers live in the range 0 <n < FFFFF. If you subtract 
<lh> from <Oh>, you get <FFFFFh> (decimal 1048575). No overflow 
or underflow indications are available. 


Type Conversions. Internal binary integers cannot be entered 
directly into the HP 48, so conversion routines are needed. There are a 
number of useful System-RPL objects which convert between real 
numbers and internal binary integers. The most basic of these are 
COERCE and UNCOERCE. COERCE converts a real number to an 
internal binary integer, and UNCOERCE converts an internal binary 
integer into a real number. 


The HP 48 will not recognize the names COERCE and UNCOERCE -— 
these are names that Hewlett-Packard gives the routines — so you must 
refer to these objects by address. The address of COERCE is 
#18CEAh, and the address of UNCOERCE is #18DBFh. 
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To begin to experiment with internal binary integers, use the following 
two programs, which we’ll name after the internal objects that are used. 


COERCE 54 Bytes Checksum #60F4h 


« 
< @ 3 CHKARGS Confirm real number as input 


#18CEAH SYSEVAL Convert to internal binary integer 
% 


UNCOERCE 64 Bytes Checksum #52Ah 


a_i 
= 


{ 26 3 CHKARGS Confirm internal binary integer as input 
#18DBFh SYSEVAL Convert to real number 
% 


A test has been added in each of these programs to be sure that the 
proper object is being converted. You can remove the test later on 
when you’ re absolutely certain that you’ll never make a mistake. 


Now use the program COERCE to convert the real numbers —1, 0, 4.49, 
4.5, 5, and 6.75E37 to internal binary integers. Assuming that the 
HP 48 is in HEX mode, you should get the following results: 


<@h> 
<6h> 


<4h> 
<5h> 
<5h> 
<FFFFFh> 
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Notice that values less than 0 convert to <Oh>, values greater than 
1048575 convert to <FFFFFh>, fractional parts < .5 round to the next 
lowest integer, and that fractional parts = .5 round to the next highest 
integer. 


Some System-RPL objects require two internal binary integers as 
parameters. The System-RPL object COERCE2 (address #194F7h) is 
useful for converting two real numbers into internal binary integers. 
The program COERCE2 uses this object after checking the arguments. 


CRCE2 55.5 Bytes Checksum #F685h 
« 


£ @ 6 3 CHKARGS Both real numbers? 
#194F 7h SYSEVAL Convert 2 reals to bints 
* 


The corollary to COERCE2 is UNCOERCE2 (address #1950Bh), 
which converts two internal binary integers into real numbers. The 
following program UCRC2 uses this object after checking the 
arguments. 


UCRC2 71.5 Bytes Checksum #C6Fh 
« 


< 26 26 3 CHKARGS Both bints? 


#1956Bh SYSEVAL Convert 2 bints to reals 
* 
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Internal Binary Integer Operations. The following System-RPL 
objects operate on a single internal binary integer (bint): 


|Command|Address|___—Description 


#03DEFh 
#03E0Eh 
#03E2Dh 
#03E4Eh 
#03E6Fh 
#03E8Eh 
#6256Ah 
#625FAh 
#6257Ah 
#6260Ah 
#6258Ah 
#6261Ah 
#625BAh 
#62674h 
#625DAh 
#6264Eh 
#625EAh 





Adds <1d> to a bint 
Subtracts <l1d> from a bint 
Adds <2d> to a bint 
Subtracts <2d> from a bint 
Multiplies a bint by <2d> 
Returns FLOOR (bint/2d) 
Adds <3d> to a bint 
Subtracts <3d> from a bint 
Adds <4d> to a bint 
Subtracts <4d> from a bint 
Adds <5d> to a bint 
Subtracts <5d> from a bint 
Adds <8d> to a bint 
Multiplies a bint by <8d> 
Adds <10d> to a bint 
Multiplies a bint by <10d> 
Adds <12d> to a bint 


The following System-RPL objects operate on two internal binary 


integers: 


#03EC2h 
#03DBCh 
#03DE0h 


#03EF7h 


#624C6h 
#624BAh 


Multiplication: returns <bint> 
Addition: returns <bint> 
Subtraction: returns <bint> 
Division: returns <remainder> 
(level 2) and <quotient> (level 1) 
Returns <maximum of two bints> 
Returns <minimum of two bints> 
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Internal Binary Integer Constants. The following objects place 
bints on the stack: 


| _ Command __|Address| Stack Output 
MINUSONE <FFFFFh> 
<0d> 
<ld> 
<2d> 
<3d> 
<4d> 
<5d> 
<6d> 
<7d> 
<8d> 
<9d> 
<10d> 
<lld> 
<12d> 
THIRTEEN <13d> 
FOURTEEN <14d> 
FIFTEEN <15d> 
SIXTEEN <16d> 
SEVENTEEN <17d> 
EIGHTEEN <18d> 
NINETEEN <19d> 
TWENTY <20d> 
THIRTYTWO <32d> 
FORTYEIGHT <48d> 
FIFTYFIVE <55d> 
FIFTYSIX <56d> 
FIFTYSEVEN <57d> 
SIXTYTWO <62d> 
SIXTY THREE <63d> 
SIXTYFOUR <64d> 
BINT_131d <131d> 
BINT255d <255d> 
ZEROZERO <0> <0> 
ONEONE <I> <I> 
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Character Constants 

A character constant is an internal object type that represents a single 
character. A character object is a distinct object type (object type 24), 
not a one character string. The HP 48 displays the word Character 
when a character object is on the stack. The following System-RPL 
objects are available for conversion between character and other object 


types: 


[Command |Address|__—Description 


#05A75h | Converts a bint to a character 


#05A51h | Converts a character to a bint 
#6475Ch | Converts a character object to a 1 
character string object 





The program TOCHR creates a character object specified by a real 
number. TOCHR calls the program COERCE to create an internal 
binary integer, then uses the object #>CHR to create the character. 


TOCHR 44.5 Bytes Checksum #3BFEh 


COERCE Convert the real number to a bint 
#5A7Sh SYSEVAL Convert the bint to a character object 
% 


& 


The #>CHR conversion uses only the lower 8 bits of the 20 bit binary 
integer argument. The lower 8 bits of 999 are 11100111, so if you 
supply 999 as the input argument to TOCHR, you get the character 
whose number is 231 decimal. This conversion is most useful when 
you already have an internal binary integer on the stack — otherwise the 
User-RPL command CHR works just fine. 
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Character Strings 

A number of System-RPL objects are available for manipulating 
character strings (object type 2). There is no error checking for these 
objects, so it may be possible to specify an operation that extends 
beyond the boundary of a string, or returns a meaningless result. 


Converting Between Name Objects and Strings. The objects 
ID>$ and $>ID may be used to convert between a name object (object 
type 6, internally known as an identifier, or an id) and a string. For 
example, the sequence * "FRED" #5B15h SYSEVAL * returns the 
name object ‘FRED’. 


$>ID #05B15h 
Converts string to name object 
“string” — ‘name’ 


ID>$ #05BE9h 
Converts name object to a string 
‘name’ — “string” 





Converting Objects to Strings. The User-RPL command ~STR 
converts a real number to a string in the current display format. If you 
want to convert the number to a string using the STD or stack display 
formats, the objects EDITDECOMP$ and a%>$, are useful. 


EDITDECOMP$ #15B13h 
Converts an object to a string in a format suitable for editing in the 
command line. 

object — “string” 


a%>$, #162ACh 
Converts a real number to a string (with commas if format is FIX) 
% — “string” 
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Adding Character Objects to a String. The objects >H$ and >T$ 
may be used to add a character object to the head (>H$) or tail (>T$) of 
a string. 


>H$ #0525Bh 
Adds a character object to the head of a string 
“string” chr — “string 


299 


>T$ #052EEh 
Adds a character object to the tail of a string 
“string” chr — “string” 





Given a string in level 2 and real number that specifies a character in 
level 1, the User-RPL program to add the character to the string would 
be * CHR + *%. This same task can be performed with the System- 
RPL objects COERCE, #>CHR, and >T$ (proving that User-RPL is 
sometimes the more efficient tool): 


ADDCHR 87.5 Bytes Checksum #E953h 


“string” x > “stringchr_x” 


« 
£ @ 2 3 CHKARGS Confirm string and real number 
#18CEAH SYSEVYAL Convert the real number to a bint 
#5ATSh SYSEYAL Convert the bint to a character object 
#52EEh SYSEVAL Add the character to the end of the string 
* 


Creating a String of Blank Characters. The object Blank$ may 
be used to create a string of space (character code 32) characters. 


Blank$ #45676h 


Creates a string of n spaces 
<n> — “string” 
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The program SPACES takes as input a real number in level 1 and 
returns a string containing the specified number of spaces: 


SPACES 45.5 Bytes Checksum #36DFh 


x — “string” 


x 
COERCE Convert the real number to a bint 


#45676h SYSEVAL Create the string 
* 


Retrieving Messages. Messages can be retrieved from the built-in 
message table with the object JtGETTHEMSG. If a localized message 
table has been installed in the HP 48 the localized message will be 
returned. Messages built into the HP 48 are listed in Messages. 


JstGETTHEMSG #04D87h 


Returns a message from the message table 
<bint> — “string” 





The program GETMSG takes as input a real number and returns the 
corresponding message: 


GETMSG 45.5 Bytes Checksum #DB2Fh 


& 
COERCE Convert the real number to a bint 
#4D37h SYSEVAL ~~ Get the message string 

% 


Example: 3095 GETMSG returns the string “Invalid Name”. 
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Searching Strings. The objects POS$ and POS$REV provide more 
control over string searches than is available with the User-RPL 
command POS. 


POS$ #645B ih 
Searches for $find in $search starting at pos (1 < pos < string length). 
Returns <0> for unsuccessful search. 

$search $find <pos> — <pos>or<0> 


POS$REV #645BDh 

Searches for $find in $search starting at pos (1 < pos < string length) 

and searching backwards. Returns <0> for unsuccessful search. 
$search $find <pos> — <pos>or <0> 





The program NXTSTR uses the object POS$ to look for the instance of 
a find string (in level 2) within a search string in level 3. The starting 
position is given in level 1. If the search is unsuccessful, 0 is returned. 


NXTSTR 90 Bytes Checksum #941Ch 


“search” “find” start — position 


« 
{ @ 2 2 3 CHKARGS Check arguments 
#18CEAM SYSEVAL Convert the starting position to a bint 
#645Bih SYSEVAL Perform the search 
#18DBFh SYSEVAL Convert the result into a real number 
* 


Example: The sequence € "12341256127" "12" 3 N&XTSTR * 
EVAL returns the result 5. 
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To illustrate reverse string searching, the program LSTSTR uses the 
object POS$REV. The arguments are the search string in level 2 and 
the’string to find in level 1. The position is returned as a real number, 
which is 0 if the find string is not found. 


LSTSTR 92.5 Bytes Checksum #7563h 
“search” “find” — position 
x 


{ 2 2 3 CHKARGS Check arguments 

OVER SIZE 

#18CEAN SYSEVAL Length of the search string as a bint 

#645BDh SYSEVAL Perform the search 

#18DBFh SYSEVAL Convert the result into a real number 
* 


Example: The sequence * "123412561278" "12" LSTSTR * 
EVAL returns the result 9. 


Finding Character Codes. The object SUB$1# is useful for finding 
the character code of an arbitrary character in a string. In User-RPL, a 
program to do this given a string in level 2 and a real number in level 1 
would be € DUP SUB NUM *. If the result needs to be a bint, it’s 
much more efficient to use SUB$1#, which is fast and avoids the 
creation of a substring in temporary memory. 


SUB$1# #30805h 


Returns the bint value of the specified character in a string 
“string” <pos> — <value> 
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Parsing a String. The object palparse performs the same parsing 
action as the (ENTER) key. This object returns either the object 
represented by the string and the internal flag TRUE, or the string, 
position of the error, remainder of the string, and the internal flag 
FALSE. 


palparse #238A4h 
Parses string into an object. Returns TRUE if the string represents a 
valid object, or the position of the error, remaining string, and 


FALSE. 
“string” — object TRUE 
or: “string”? — “string” <pos> string? FALSE 





The object palparse is useful for instances when a string needs to be 
parsed and the output should not be evaluated. For instance, you might 
want to place the command + on the stack. Parsing the string “+” is 
one way to accomplish this. The program PARSE simplifies the use of 
palparse. A string is supplied, and the result in level 1 is O if the 
parsing was unsuccessful, or 1 if the string was valid. If the result is 1, 
the object is returned in level 2. This program uses the System-RPL 
object COERCEFLAG* (address #5380E), which is described in Tests. 


PARSE 108.5 Bytes Checksum #CCBCh 


“string” — object 1 Successful 


“string” > O Failed 

4 
{ 2 3 CHKARGS Verify string input 
#238A4 SYSEVAL Attempt to parse the string 
IF * #5380E SYSEVAL * EVAL Convert the flag to 0 or 1 
THEN 1 Return ob and | if OK 
ELSE 3 DROPH @ Else return 0 
END 

* 


* An extra program shell is required around COERCEFLAG to make 
the program work, since COERCEFLAG does an implied *. 
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Real and Extended Real Numbers 

Internal calculations involving real numbers (object type 0) are 
performed using extended real numbers (object type 21) to maximize 
the precision of calculations. A real number consists of a sign, 12 digit 
mantissa, and 3 digit exponent. An extended real number consists of a 
sign, 15 digit mantissa, and 5 digit exponent. Exponents are stored in 
10s complement form. Real exponents live in the domain —-500 < EEE 
< 500, and extended real exponents live in the domain —50000 < 
EEEEE < 50000. 


When an extended real number is on the stack, the HP 48 displays the 
words Long Real. 


The naming convention for System-RPL objects uses % to denote a real 
number and %% to denote an extended real number. Object 
descriptions in this chapter use the same notation. 


Real Number Conversions. Sometimes it’s desirable to maintain 
intermediate results of a long calculation as extended reals to minimize 
roundoff errors. The following System-RPL objects are used to convert 
between real and extended real numbers: 


Jo>%o%o #2A5Clh 
Converts a real number to an extended real number 
% > Hh 
%V%>V #2A5BOh 
Converts an extended real number to a real number 
%% > 


2%>%% #2B45Ch 
Converts two real numbers to extended real numbers 

% % > hh %% 
2% %>% #2B470h 


Converts two extended real numbers to real numbers 


%% _%% — % % 
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The following two programs are useful for frequent conversions 
between real numbers and extended real numbers. RTOER converts a 
real number to an extended real number; ERTOR performs the reverse 
conversion. 


RTOER 53 Bytes Checksum #2D11h 
« 


< @ > CHKARGS Is this a real number? 
#2A5Cih SYSEVAL Convert to extended real number 
* 


ERTOR 61 Bytes Checksum #E144h 


x 
<£ 21 3 CHKARGS Is this an extended real number? 
#2A5BGh SYSEVAL Convert to real number 

» 


Some System-RPL objects require two extended real numbers as 
parameters. The System-RPL command 2%>%% (address #2B45Ch) 
is useful for converting two real numbers into extended real numbers. 
The program RTOE2 uses this command after checking the arguments. 


RTOE2 55.5 Bytes Checksum #7783h 


% T > hh %% 


¥ 
{ @ @ 3} CHKARGS Both real numbers? 
#2B45Ch SYSEVAL Convert 2 reals to extended 
* real numbers 
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The corollary to 2%>%% is 2%%>% (address #2B470h), which 
converts two extended real numbers into real numbers. The program 
ETOR2 uses this object after checking the arguments. 


ETOR2 71.5 Bytes Checksum #A5BDh 


%% So% — To % 


x 
£ 21 21 3 CHKARGS Both extended reals? 
#2B476h SYSEVAL Convert 2 extended real 
e numbers to reals 


Extended Real Functions. The following objects operate on 
extended real numbers: 


%oVo+ #2A943h 
Adds two extended real numbers 

%% SS > 0% 
%o%o— #2A94Fh 
Subtracts two extended real numbers 

%% GSS > bh% 
Jo%o* #2A99Ah 
Multiplies two extended real numbers 

%% %% > %% 


Jo%ol #2A9E8h 


Divides two extended real numbers 

%% 0% > bh% 
Joo #2AA5Fh 
Raises extended real in level 2 to power of extended real in level 1 

7% hh > hh 
T%%ABS #2A8FOh 
Absolute value of an extended real number 

%% _ —> %% 
%%ANGLE #2AD4Fh 
Angle from rectangular coordinates 
%%x Sy > MWGangle 
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%o%CHS 
Change sign 


TF _— 0% 
%o%COS 
Cosine 

2% _ — 0% 
% %COSH 
Hyperbolic cosine 

%% _ —> %%% 
JoTEXP 
e*x 

%% > hb 
%%FLOOR 
Returns greatest integer <= x 

7% _— %% 
% %H>HMS 
Converts decimal hours to HH.MMSS form 

%% _ — 0% 
Jo%OLN 
Natural log 

0% _ — %% 
%o%LNP 1 
In(x+1) 

TT > b%% 
Jo%MAX 
Returns larger of two numbers 

7% Tr — %% 

Jo%SIN 
Sine 

%% — %% 
%o TSINH 
Hyperbolic sine 

%% _ —> %% 
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#2A910h 


#2AC57h 


#2ADC7h 


#2AB1Ch 


#2AF99h 


#2AF27h 


#2AB5Bh 


#2AB94h 


#2A6DCh 


#2ACO06h 


#2AD95h 
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%o%SQRT #2AAEAh 
Square root 


%% _ — %% 


%%TANRAD #2ACA8h 
Tangent using radians 





TF _ — %% 


Rectangular/Polar Conversions. The following objects convert 
between rectangular and polar coordinates using the current angle 
mode: 









%REC>%POL #2B48Eh 
Real number rectangular to polar conversion 
%x hy — radius angle 
JPOL>%REC #2B4BBh 
Real number polar to rectangular conversion 
%radius Yangle > %x Ay 
JoTR>P #2B498h 
Extended real number rectangular to polar conversion 
%%x Why — %radius %%angle 

%o%P>R #2B4CSh 
Extended real number polar to rectangular conversion 

%%radius %%angle > %%x Wy 
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Example: Log to an Arbitrary Base. The common logarithm 
(LOG) and natural logarithm (LN) functions are built into the HP 48, 
but logs to other bases must be calculated, and the process often 
introduces small roundoff errors. To calculate a log to the base a, use 
the rule LOG,b = LOG(b)/LOG(a). 


To demonstrate the the effect of roundoff errors, calculate 234, which 
yields 17,179,869,184. Suppose you wish to reverse the process and 
ask ‘What power of 2 is this?” Apply the rule above using both the 
LOG and LN functions. Press: (ENTER)(LOG)(2)(LOG)(=)[(SWAP)[LN)[2) 
(LN)(=). The answer should be 34, but notice that neither LOG or LN 
got the right answer. 


The program LOGB performs the calculation using extended real 


numbers. LOGB requires the number in level two and the base in 
level 1. 


LOGB 87 Bytes Checksum #60C3h 


x n—  log,(x) 


€ 
RTOE2 Convert reals to extended reals 
#2ABSBh S'SEVAL Take the log of the base 
SWAP 
#2ABSBh SYSEVAL Take the log of the number 
SWAP 
#2A9ESh SYSEVAL Divide 
ERTOR Convert result to real number 
+ 
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Displaying Extended Reals. When an extended real number is on 
the stack, the HP 48 displays the words Long Real. If you wish to 
examine the digits in the extended real number, you need a tool to 
perform a conversion. Several small utility programs are presented 
here to facilitate the use and display of extended real numbers: 


MKERTOA Creates the program ERTOA. 


ERTOA Converts an extended real number object to a string 
object showing all the digits. 


DSPER Displays stack levels 1 and 2 in the status area of the 
display using the small graphics font. 


ERCALC A custom menu for extended real calculations. 


The program ERTOA may be used to display the digits in an extended 
real number. The technique used is to execute an assembly language 
code object that reads the data in the body of an extended real object 
and writes the appropriate characters to the body of a new string object. 


Since ERTOA cannot be entered from the keyboard the program 
MKERTOA (shown on the next page) is used to create ERTOA. Enter 
the program MKERTOA, verify its checksum, then execute it to create 
ERTOA. Once ERTOA has been created, you can use it to see all the 
digits in an extended real number. 


Example: Display the extended real square root of 3: 
« 3 RTOER #2AAEAMH SYSEVAL ERTOA + 
era 
" 1. 7326598075688 7E+s0868" 


Notice that the string is too wide to fit completely in the display. The 
program DSPER (listed on the page after MKERTOA) can be used to 
display the contents of stack levels 1 and 2 as graphics objects on the 
stack display. By using the small graphics font, DSPER can easily 
display an extended real number. 
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MKERTOA uses the System-RPL objects CHANGETYPE, 
INNERCOMP and ::N to build the program. These are described in 
Composite Objects. 


WARNING 
Please verify the checksum of MKERTOA before you use it. 


If any of the numbers are incorrect, the code object that gets 
created will be incorrect, and will corrupt memory when used. 





MKERTOA 1619.5 Bytes Checksum #EE15h 


« 
266 8 76 18 65 6 125 47 142 165 246 168 24 23 
2965 1506 166 138 46 167 234 4 19 65 132 24 65 
132 24 64 143 86 23 29 65 45 19 2 26 81 113 212 
16 32 214 137 66 86 2 186 48 17 23 29 65 69 19 
234 95 166 23 29 65 156 166 138 46 166 24 126 
166 269 51 113 61 81 156 166 138 46 @ 51 94 163 
1 48 24 23 29 65 45 19 6 128 146 1 48 24 114 81 
74 16 1 36 25 113.19 17 65 76 26 49 116 16 163 
216 248 68 16 6 53 67 76 26 65 2 162 196 48 49 
35 16 57 196 248 @ 3 164 48 163 155 248"" 1 143 
START SWAP CHR + NEXT ~~ Loop to accumulate bytes 
11724 #18CEANH SYSEVAL Create code object prologue 


#5ABSh SYSEVAL Execute CHANGETYPE 

x Program shell 
IF DUP TYPE 21 # Confirms object is extended real 
THEN 3514 DOERR Invalid Argument Type if not 
END 

» 

#54AFH SYSEVAL Execute INNERCOMP 

12 ROLL 3 ROLLD Move code object into position 

#3DEFh SYSEVAL Execute #1+ 

#5445h SYSEVAL Execute ::N to build program 

'ERTOA' STO Store program in ERTOA 


* 


Once MKERTOA has been executed, it may be purged to save 
memory. 
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DSPER uses the System-RPL objects BlankDA1, XYGROBDISP and 
the example program XYGD, which are described further in this 
chapter under the heading Graphics Operations. 


DSPER 375.5 Bytes Checksum #43D4h 


x 
IF DEPTH 
THEN 
IF DUP DUP TYPE 21 == 
THEN ERTOA 
ELSE +STR 
END 
IF DEPTH 2 > 
THEN 
3 PICK 
IF DUP TYPE 21 == 
THEN ERTOA 
ELSE +STR 
END 
ELSE wu 
END 
ELSE 
END 
#3A546h SYSEVAL 
"2: >" SWAP + 
1 +GROB 
{ #@d #6d 3 { #131d #6d 3} 
SUB 
6 @ RXYGD 
"1: " SWAP + 
1 +GROB 
{ #6d #6d 3 € #131id #6d + 
SUB 
6 8 AYGD 
1 FREEZE 
» 
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Check for empty stack 


Tf level 1 ob is ext real 
use ERTOA 
otherwise convert to string 


Check for level 2 object 


If exists, get it 

Tf level 2 ob is ext real 

use ERTOA 

otherwise convert to string 


Null $ if no level 2 ob 


Display 2 null strings if 
the stack is empty 

Clear status display lines 
Add level number to string 
Make grob with small font 


Trim to display width 
Display level 2 grob 

Add level number to string 
Make grob with small font 


Trim to display width 


Display level 1 grob 
Freeze display area 1 
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An Extended Real Calculating Environment. The program 
ERCALC combines the tools described so far into a small extended real 
calculating environment by creating a custom menu. 


ERCALC 777 Bytes Checksum #72E3h 


x 
t 


{ "RSER" « RTOER DSPER » 3 
< "ERSR" « ERTOR DSPER » 3 
t eee" 
# € 21 21 } CHKARGS #2A943h SYSEVAL DSPER » 
> 
< wen " 
« € 21 21 } CHKARGS #2A94Fh SYSEVAL DSPER » 
3 
{ ese" 
« € 21 21 } CHKARGS #2A99Ah SYSEVAL DSPER » 
3 
{ wee 
« € 21 21 } CHKARGS #2A9ESh SYSEVAL DSPER » 
3 
£ wene 
« € 21 21 > CHKARGS #2AASFh SYSEVAL DSPER » 
> 
{ "%XEKP" 
« € 21 > CHKARGS #2AB1Ch SYSEVAL DSPER » 
> 
¢ "%xLN" 
« € 21 > CHKARGS #2ABSBh SYSEVAL DSPER » 
3 
¢ "eat 
« € 21 > CHKARGS #2AREAH SYSEVAL DSPER » 
> 
DSPER 


3 
THENU DSPER 
* 
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ERCALLC creates a temporary menu and executes DSPER. Each key 
performs its labeled function and executes DSPER to show the results. 


Now you can use ERCALC to see what actually happened when you 
calculated the log base 2 of 17179869184 (234). 


Execute ERCALC to display the temporary menu, then enter 2 34 
R+ER wLH 2 R+ER tL Mt 


2.356700413903B1E+00001 
6.93147 180SS994SE-00001 


Long Real 
Long Real 
Pees [eXEMPLZELN | xed [DSPERL | 


2: 
1: 
4 
3 
2 
1 





Now press ##¢ to do the divide operation: 


3,.39999999999999E+00001 


Long Real 
EEG Ge Ee Eee Ee 





Notice that the result is still not exactly 34. The rounding process that 
occurs during the conversion from an extended real number to a real 
number has the effect of rounding up to 34. 
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Composite Objects 

The term composite object refers to any object built up of a series of 
arbitrarily typed objects. Lists and programs are examples of 
composite objects. (Note: an array is not a composite object.) While 
many operations on composite objects may be performed with the 
provided User-RPL commands, some additional System-RPL objects 
are useful to have available. In the stack diagrams below, a composite 
object is referred to as a comp. 


The Size of a Composite Object. The objects LENCOMP and 
DUPLENCOMP returns the number of objects in a composite object as 
an internal binary integer: 


LENCOMP #0567Bh 
Returns the number of objects in a composite object 
comp — <n> 


DUPLENCOMP #6323 1h 
Returns a composite and the number of objects in the composite 
comp — comp <n> 





First and Remaining Elements of a List. The objects 
CARCOMP and CDRCOMP return the first object in a composite or 
the composite object less its first element: 


CARCOMP #05089h 
Returns the first object in a composite 
comp — ob, 


CDRCOMP #05153h 
Returns a composite less its first object 
comp — comp’ 





If a composite object is null, CARCOMP returns a null composite of 
the same type. If a composite object is null or has one element, 
CDRCOMP returns a null composite of the same type. 
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The object NTHELCOMP returns the nth object within a composite 
and the flag TRUE or the flag FALSE if n is out of range (see Tests for 
a description of the flags TRUE and FALSE). If you’re absolutely 
certain that n specifies an object within the composite, you can use the 
object NTHCOMPDROP. If you specify n out of range for 
NTHCOMPDROP, the HP 48 will surely wander “off the range” with 
possibly dire consequences (as has happened to the author on occasion). 


NTHELCOMP #056B6h 
Returns the nth object in a composite and TRUE or FALSE 
comp <n> — obp TRUE or FALSE 


NTHCOMPDROP #62B9Ch 
Returns the nth object in a composite 
comp <n> — ob 





Decomposing Composite Objects. The object INNERCOMP 
may be used to perform the equivalent of OBJ— for composite objects. 


INNERCOMP 
Decomposes a composite object 

comp — obj,...0b, <n> 
Examples: 


{ ob, ... obp } ob; ...ob, <n> 
‘A+BxC’ ‘A’ ‘B’ ‘C? * + <Sh> 
* 2+ > * 2 + % <4h> 





When a list is decomposed with INNERCOMP, the results are the same 
that you would expect from OBJ—, except that the number of objects 
in the list is returned as an internal binary integer. A list can be built 
with the command {}N. 


When a symbolic object is decomposed the objects are placed on the 


stack in the order in which they would be evaluated. A symbolic object 
can be built with the command SYMBN. 
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INNERCOMP can be quite interesting when applied to a program 
object, as shown in the stack diagram above. Notice that the program 
delimiters * and * are actually returned as commands. These 
commands must be included at the appropriate ends of a User-RPL 
program. A program object may be built with the object ::N. 


Extracting a Subset of a Composite. The object SUBCOMP 
may be used to extract a portion of a composite object, much the same 
way that the User-RPL command SUB works. 


SUBCOMP 


Returns sub-composite. 
comp <start> <end> — comp 





Building Composite Objects. The objects {}N, SYMBN, and ::N 
all perform a similar operation — building a composite object from a 
series of objects on the stack. 


{}N 
Creates a list object from <n> objects on the stack 
ob; ... Ob» <n> — { ob, ... ob; } 


SYMBN #0546Dh 


Creates a symbolic object from <n> objects on the stack 
ob; ... ob, <n> — ‘symbolic’ 


iN 
Creates a program object from <n> objects on the stack 
ob; ... ob, <n> — :: 0b, ... ob, ; 





Building a program object is a special case, since ::N actually builds an 
internal version of a program, sometimes called a secondary. When a 
secondary is displayed on the stack, it merely looks like a program 
without the program delimiters. Program delimiters are essential, 
however, and should be included when you build a program object. 
Note that the # (x>>, address #23639h) at the end of a program is 
different from the # (x>>ABND, address #235FEh) used at the end of a 
program object that stores local variables. 
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Example: 


& 

x 

4 

%  € x>>ABND_ (#235FEh) 
% é %> (#23639h) 


Some “shortcut” objects are available for building small lists: 


NULL{} #055E9h 
Returns a null (empty) list 


aera 
ONE{}N #23EEDh 
Creates a list containing one object 

ob > {ob} 
TWO{}N #631B9h 
Creates a list containing two objects 
ob» ob; = { ob? ob; } 
THREE{ }N #631CDh 
Creates a list containing three objects 
ob3 ob2 obj > { ob3 ob2 obj; } 





Composite Object Utilities. 


EQUALPOSCOMP #644A3h 
Returns index of first object in a composite that match ob. Returns 
<0> if the object is not found. 

composite ob — <pos> 


Embedded? #64127h 


Returns TRUE if object in level 1 is equal to or embedded in the 
level 2 object, otherwise returns FALSE 
ob ob — flag 
apndvarlst #35491h 
Adds an object to a list if ob is not already in the list 
{ list} ob — { list } 
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Tests 
System-RPL objects which need to return “true” or “false” results do so 
with the system flag objects TRUE and FALSE (object type 27): 


TRUE #03A8 1h 
The system TRUE flag 


FALSE #03ACOh 
The system FALSE flag 





Stack diagrams in this chapter use the term FLAG to represent a system 
flag that can be either TRUE or FALSE. 


Flag Conversions. The object COERCEFLAG may be used to 
convert the internal flags into real numbers: TRUE maps to | and 
FALSE maps to 0. 


COERCEFLAG #5380Eh 


Converts a system flag to a real number 
FLAG > % 





COERCEFLAG is useful, but performs an end-of-program action when 
finished. This means you must include the call to COERCEFLAG in 
an extra set of program delimiters: 

* #536G6E SYSEVAL * EYAL Convert the flag to 0 or 1 


The program PARSE (earlier in this chapter) illustrates a use of 
COERCEFLAG. 


To convert a real number flag into a system flag, use the object %0<>: 


T0<> #2A7CFh 


Returns TRUE if a real number is non-zero 
% — FLAG 
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Flag Utilities. The following objects are available for manipulating 
flags: 


AND #03B46h 
Logical AND 


FLAG FLAG —~ FLAG 
OR #03B75h 
Logical OR 
FLAG FLAG ~ FLAG 
NOT #03 AF2h 
Logical NOT 
FLAG — FLAG 
XOR #03 ADAh 
Logical XOR 





FLAG FLAG ~ FLAG 


Binary Integer Tests. The following objects compare two internal 
binary integers: 


#= #03D19h 
Equality 

<bint> <bint>» — FLAG 
#<> #03D4Eh 
Inequality 

<bint> <bint> — FLAG 


#> #03D83h 
Greater than 


<bint> <bint> — FLAG 
#< #03CE4h 
Less than 





<bint> <bint> — FLAG 
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The following objects test the value of a single internal binary integer: 


#0= #03CA6h 
Returns TRUE if bint = <0> 

<bint> — FLAG 
#0<> #03CC7h 
Returns TRUE if bint # <0> 

<bint> — FLAG 
#1= #622A7h 
Returns TRUE if bint = <I> 

<bint> — FLAG 
#1<> #622B6h 
Returns TRUE if bint # <1> 

<bint> — FLAG 
#2= #6229Ah 
Returns TRUE if bint = <2> 

<bint> — FLAG 
#2<> #636C8h 
Returns TRUE if bint # <2> 

<bint> — FLAG 
#3= #62289h 
Returns TRUE if bint = <3> 

<bint> — FLAG 
#5= #636B4h 
Returns TRUE if bint = <5> 

<bint> — FLAG 
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Extended Real Number Tests. The following objects compare two 


extended real numbers: 


%o%> 
Greater than 


%% _%% -—>» FLAG 


I< 
Less than 

%% %% —> FLAG 
%oVo>= 
Greater than or equal to 

%% %% —» FLAG 
To Vo<= 
Less than or equal to 

%% _ %% —» FLAG 


#2A87Fh 


#2A81Fh 


#2A895h 


#2A8ABh 





The following objects test the value of an extended real number: 


Jo %O= 

Returns TRUE if %% is equal to %%0 
%% —» FLAG 

%o%0<> 

Returns TRUE if %% is not equal to %%0 
%% —» FLAG 

Jo%0> 

Returns TRUE if %% is greater than %%0 
%% —» FLAG 


JoV0<= 
Returns TRUE if %% is less than or equal to %%0 
%% —>» FLAG 
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#2A75Ah 


#2A7BBh 


#2A788h 


#2A80Bh 
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Stack Operations 

In general, stack operations — even User-RPL stack operations — are 
fairly efficient. When a program has been streamlined with CMP48 
(page 195), the stack operations presented below provide a speed 
increase. 


2DUPS5ROLL #63C40h 
ob; ob 0b3 — ob2 ob3 ob2 ob3 ob; 
2DUPSWAP #611F9h 
ob; oby — ob, ob2 ob2 ob; 
2OVER #63FBAh 
0b; obz ob3 obs — obj; ob2 ob3 oby ob; ob2 
2SWAP #62001h 
ob; ob ob3 ob4 - ob3 oby ob; ob2 
3PICK3PICK #63C68h 
ob; obz ob3 — ob, obg 0b3 ob; ob2 
3PICKOVER #630B5h 
ob; ob ob3 - ob; ob2 ob3 ob; ob3 
3PICKSWAP #62EDFh 
ob; obz ob3 — obj ob2 ob; 0b3 
4PICKOVER #630C9h 
ob; obz ob3 oby — ob; ob2 ob3 oby ob; oby 
4PICKSWAP #62EF3h 
ob; ob2 ob3 ob, =z ob; ob2 ob3 ob; ob, 
4ROLLDROP #62864h 
ob; obz ob3 ob4 — ob ob3 oby 
4ROLLSWAP #62ECBh 
ob; obz ob3 ob4 — ob2 ob3 ob; ob, 
4UNROLL3DROP #6113Ch 
ob; ob2 ob3 ob4 — obg 
4UNROLLDUP #62D09h 
ob; ob2 ob3 obg — oby ob; ob2 ob3 ob3 
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4UNROLLROT #63015h 
ob; ob2 ob3 ob4 — ob4 ob2 ob3 ob; 
SROLLDROP #62880h 
ob; obz ob3 oby obs — ob2 0b3 oby obs 
DROPDUP #627A7h 
ob; oby — obj obj 
DROPOVER #63029h 
ob; ob? ob3 > ob; ob ob; 
DROPROT #62FCSh 
ob; oby ob3 ob4g — oOb2 ob3 ob; 
DROPSWAP #6270Ch 
ob; obz ob3 — ob2 obj 
DUP4UNROLL #61099h 
ob; ob2 ob3 = ob3 ob; ob2 ob3 
DUPROT #62FB lh 
ob; ob2 — ob ob2 obj 
NDROP #0326Eh 
ob, ...0b; <n> > 
NDUP (Duplicates <n> objects as a group) #031D9h 
ob, ...ob; <n> — ob, ... ob; Ob, ... ob; 
NDUPN (Makes <n-1> copies of an object) #5E370h 
ob <n>_— _ ob... ob <n> 
OVERSPICK #63C90h 
ob; ob ob3 ob, obs =, ob; ob2 ob3 ob, obs oby ob2 
OVERDUP #62CCDh 
ob; ob > ob; obz ob; ob; 
OVERSWAP #62D3 1h 
ob; oby — obj ob; ob2 
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PICK #032E2h 
ob, ...0b; <n> — ob, ... obj ob, 
ROLL #03325h 
ob, ...0oby <n> — obj;-; ... ob; Ob, 
ROLLDROP #62F89h 
ob, ...0ob; <n> — ob, ... obj 
ROT2DROP #62726h 
ob; ob2 ob3 > ob2 
ROT2DUP #62C7Dh 
ob; ob2 ob3 - ob2 ob3 ob; ob3 ob; 
ROTDROP #60F21h 
ob; obz 0b3 — ob2 ob3 
ROTDROPSWAP #60FOEh 
ob; ob2 ob3 - ob3 ob2 
ROTDUP #62775h 
0b; obz 0b3 — oby ob3 ob; obj 
ROTOVER #62CASh 
ob; ob2 ob3 - ob ob3 ob; ob3 
ROTROT2DROP #6112Ah 
ob; ob2 ob3 - ob3 
ROTSWAP #60EE7h 
ob; ob2 0b3 — ob2 ob; 0b3 
SWAP2DUP #6386Ch 
ob; ob2 — ob? ob; ob2 ob; 
SWAP3PICK #63C54h 
ob; obz ob3 — obj ob3 oby ob; 
SWAP4PICK #63C7Ch 
0b; ob7 0b3 ob4 — ob; ob? oby ob3 ob; 
SWAP4ROLL #63C2Ch 
ob; ob2 ob3 ob4 — ob? oby ob3 ob; 
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SWAPDROP #60F9Bh 
ob; ob2 =? ob2 


SWAPDROPDUP #62830h 


ob; ob2 — ob? ob2 
SWAPDUP #62747h 
ob; ob2 — ob» obj obj; 
SWAPOVER #61380h 
ob; oby — ob» ob; ob2 
SWAPROT #60F33h 
ob; obz ob3 — ob 3 ob2 ob; 
UNROLL #0339Eh 
ob, ...0b; <n> — obj ob, ... ob 
UNROT #60FACh 
ob; obz ob3 — o0b3 ob; ob2 
UNROTDROP #6284Bh 
ob; obz 0b3 — ob; ob; 
UNROTDUP #62CF5h 
ob; ob ob3 nd ob3 ob; ob ob2 
UNROTOVER #6308Dh 
ob; ob2 0b3 — 0b3 ob; ob2 ob; 
reversym #5DE7Dh 


ob, ...ob; <n> — obj ...ob, <n> 
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Graphics Operations 

The HP 48 contains three built-in graphics objects (nicknamed grobs) 
for use in the display. These grobs are the stack grob, the graphics 
grob (PICT), and the menu grob. 


Pointers to Display Grobs. The following objects return pointers 
to these built-in grobs. If the returned grob is to be modified for later 
use, you should use NEWOB to create a unique copy in temporary 
memory. 


ABUFF #12655h 
Returns a pointer to the stack display 

— grob 
GBUFF #12665h 
Returns a pointer to the graphics display 

— grob 


HARDBUFF #12635h 
Returns a pointer to the currently displayed ABUFF or GBUFF grob 
— grob 
HARDBUFF2 #12645h 
Returns a pointer to the menu grob. 
— grob 





These pointers are useful for using the stack or graphics display as 
arguments to other commands. For instance, to place a copy of the 
stack display in PICT, execute 


* #12655h SYSEVAL PICT STO # 


which is the same as ®* LCD+ PICT STO *® except that the menu is 
not included. 
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Display Control. The following objects control the display: 


TOADISP #1314Dh 
Switches the LCD to the stack display 

Seed 
TOGDISP #13135h 
Switches the LCD to the graphics display 

Sara 


ClrDA 1IsStat #3953 1h 
Suspends the ticking clock display 

aera 
RECLAIMDISP #130ACh 
Switches LCD to stack display, clears the stack display, and resizes 
the stack display to 131x56 pixels 

Saeed 
TURNMENUON #4E347h 
Turns on the menu display 

a 
TURNMENUOFF #4E2CFh 
Turns off the menu display and enlarges the stack display to 131x64 

Sard 





The program TOTEXT establishes complete control over a clear stack 
display: 


TOTXT 66 Bytes Checksum #4265h 


¥ 
#39531h SYSEVAL Executes ClrDA I1IsStat 
#13GAChH SYSEVAL Executes RECLAIMDISP 
#4E2CFh SYSEVAL Executes TURNMENUOFF 
e 
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Clearing the Display. The following objects clear either part or all 
of the currently displayed grob (ABUFF or GBUFF). Display rows 
(pixel rows) are numbered beginning with row number 0 at the top 
down to 55 at the bottom. 


BLANKIT #126DFh 
Clears a specified number of rows 

<startrow>_<#ofrows> _—> 
BlankDA1 #3A546h 
Clears rows 0-15 


BlankDA12 #3A578h 
Clears rows 0 — 55 


BlankDA2 #3A55Fh 
Clears rows 16-55 


~ 
CLEARVDISP #134AEh 
Zeros out the entire grob pointed to by HARDBUFF 

=> 
Clr8 #0E083h 
Clears the top 8 rows 
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Clearing Part of a Grob. The object GROB!ZERO clears a 
rectangle from x,,y,; in the upper-left to x2,y2, which is one pixel below 
and to the right of the area to be cleared. The upper-left corner of a 
grob has the coordinates <0> <0>. 


GROB!ZERO #11A6Dh 
Zeros out a rectangular portion of a grob. 
grob <xj> <yj> <x2> <y2> — grob 


WARNING 
GROB!ZERO does no range checking, and will write 
beyond the boundaries of the grob if given incorrect 
coordinates. In that event, memory will be corrupted. 





The grob parameter may be any arbitrary grob, including HARDBUFF. 
GROB!ZERO writes directly to memory, and the pointer to the grob is 
returned to level 1. 


Note that PICT is not a valid parameter for the target grob for the 


command GROB!ZERO To erase a portion of the stack display or 
graphics display, use ABUFF or GBUFF. 
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Creating a Blank Grob. The User-RPL command BLANK takes 
two user binary integers (object type 10) from the stack and creates a 
blank graphics object of the specified size. The System-RPL object 
MAKEGROB does the work for BLANK. The input parameters are 
internal binary integers (object type 20): 


MAKEGROB #1158Fh 


Creates a blank grob 
<height> <width> -—  grob 





Finding the Size of a Grob. The objects GROBDIM and 
DUPGROBDIM return the size of a grob expressed in internal binary 
integers: 


GROBDIM #50578h 
Returns the dimensions of a grob 
grob — <height> <width> 


DUPGROBDIM #5179Eh 
Duplicates a grob before returning its dimensions 
grob — grob <height> <width> 
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Adding Graphics Objects to the Stack Display. The object 
XYGROBDISP is used to place a grob into the grob pointed to by 
HARDBUFF (the stack display or PICT — see page 179). 


XYGROBDISP #128BOh 
Adds a grob to HARDBUFF 





<x> <y> grob > 


Coordinates are specified with internal binary integers, and use pixel 
coordinates (see Graphics Coordinates). The upper-left corner of the 
display has the coordinates x=<0> y=<0>. If the grob being added to 
HARDBUFF would extend beyond the boundaries of HARDBUFF, 
then HARDBUFF is enlarged to accomodate the new grob. 


The program XYGD takes a grob in level 3, x-coordinate as a real 
number in level 2, and y-coordinate as a real number in level 1, and 
displays the grob in HARDBUFF: 


XYGD 45 Bytes Checksum #5095h 


& 
CRCE2 Convert real coordinates into bints 
ROT Order parameters for XY GROBDISP 
#128BGh SYSEVAL Execute XYGROBDISP 

* 


To glue several of these examples together, try the program FUN: 


FUN 95.5 Bytes Checksum #C47h 


« 
TOTAT Take over the stack display 
"SYSTEM PROGRAMMING IS FUN!" 
1 +GROB Convert text to a grob 
11 36 XYGD Place grob in stack display 
TY FREEZE Freeze the display 

* 
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Making a Box. The object GROB!ZERO may be used to create a 
blank grob with a one-pixel-wide border around it. The program 
MKBOXxX takes the desired height (in pixels expressed in real numbers) 
of the box from level 2 and the width from level 1. 


MKBOX 131 Bytes Checksum #7805h 


height width > grob 


CRCE2 Convert the real numbers into bints 
#1158Fh SYSEVAL NEG Create the grob and invert it 
#63AC4h SYSEVAL Put the bints <1> <I> on the stack 
3 PICK (4: grob 3: <1> 2: <1> 1: grob) 


Now get the grob dimensions for the lower-right corner with the 
GROBDIM command 


#50578h SYSEVAL (5: grob 4: <I> 3: <I> 2: <y> 1: <x>) 


#3EGEh SYSEVAL Subtract <1> from width 

SHAP Swap to create x-coordinate 
#3EBHEh SYSEVAL Subtract <1> from height 
#11A6Dh SYSEVAL Zero out the interior of the grob 


Now use the program SHWBX< to create a box of arbitrary size and 
show it in the upper-left corner of the stack display: 


SHWBX 54 Bytes Checksum #4C38 


height width > 


« 
TOTRT Take over the stack display 
MKBOX Create the box 
6 6 KXYGD Show the box in the upper left 
7 FREEZE Freeze the display 

Fs 
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Placing Text in a Box. Suppose you’ ve drawn a graph in PICT, and 
you wish to place a nice title at the top of the graph. The programs 
TXTBX and LBLPICT may be used to get the job done. The first 
program, TXTBX, accepts a string in level 2 and a font number 
(1=small, 2=medium, 3=large) in level 1. 


TXTBX 89 Bytes Checksum #545Fh 


“string” font_number > grob 


« 
+GROB Convert text to grob 
DUP SIZE Get size as user binary integers 
BeR 3 + Calculate height of box as a real 
SWAP B+R 3 + Calculate width of box as a real 
MKBOX Create the box with a border 
{ #2h #2h } Coordinates for text insertion 
ROT GOR Place text in the box 

* 


Combining Graphics Objects. The User-RPL commands GOR 
and GXOR are useful for superimposing one grob on top of another, 
but when you want to place a smaller grob into a larger grob as a 
replacement operation, the User-RPL command REPL or the System- 
RPL object GROB! become very useful. 


GROB! #11679h 
Stores level 4 grob into level 3 grob at specified coordinates 
grob grob <col> <row> —> 


WARNING 
GROB! does no range checking, and will write beyond 
the boundaries of the target grob if given incorrect 
coordinates. In that event, memory will be corrupted. 





Note that PICT is not a valid parameter for the target (level 3 input 
parameter) grob for the command GROB! To write to the stack display 
or graphics display, use ABUFF or GBUFF. 
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Now you can use the program LBLPICT to place a boxed label at the 
top center of PICT. LBLPICT takes the same parameters as TXTBX: 


LBLPICT 150 Bytes Checksum #FAIh 


“string” font_number > 


x 
TKTBX Create the label in a box 
#12665h SYSEVAL Get pointer to graphics display 
DUP SIZE DROP Find the width of graphics display 
3 PICK SIZE DROP Get the real width of the label box © 
IF DUP2 2+ < Make sure the label will fit 
THEN 
"Label Too Big" DOERR 
END 
-2-r Calculate x position for label 
B+R @ CRCE2 Assemble coordinates for GROB! 
#11679h SYSEVAL Add the label 
C3} PVIEW Display PICT, wait for 
» 


To try out LBLPICT, plot the function SIN(X)/X in radians mode with 
the range set to (-6.5< X < 6.5), (-.5 < Y ¥ 1.4), then execute 
LBLPICT with the parameters “SIN(X)/X” 2: 


SINCKI/K 





The program # EQ +STR 2 LBLPICT *# will label the graph in 
PICT with the contents of EQ (assuming that the equation is fairly 
short). 
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Drawing Lines. Several System-RPL objects are available for line 
drawing. Lines are drawn from coordinates <x1>,<y1> to <x2>,<y2>. 
The coordinates for these line drawing objects are expressed as bints 
and require that input coordinates be placed on the stack in left-to-right 
order — that is, <xj> < <x2>. The command ORDERXY¢# is useful for 
ordering the input parameters to the line drawing objects: 


ORDERXY# #51893h 


Asserts left-to-right order for line-drawing coordinates 
<xXj> <y1> <X2> <y2> 2 <xX)> <y|> <X2> <y2> 





The program ORDXY accepts real-number coordinates, converts them 
to bints, and executes ORDERXY# to prepare for the internal line 
drawing commands. The stack diagram for ORDXY is: 


ORDXY 67.5 Bytes Checksum #B2EDh 


Xt Yi X2 Y2 2 <Xjp> <yi> <X2> <y2> 


4 
CRCE2 Convert coordinates to bints 
#62601h SYSEVAL Swap coordinate pairs with 2;WAP 
CRCE2 Convert other coordinate pair 
#51893h SYSEVAL Evaluate ORDERXY# 

* 


The User-RPL commands LINE and TLINE draw a solid line or a line 
which toggles pixel states in the graphics display. The System-RPL 
object LINEOFF3 clears a line of pixels: 


LINEOFF3 #50ACCh 


Clears a line of pixels in the graphics display 
<Xy> <Vj> <X2> <y2> > 
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The System-RPL objects LINEON, LINEOFF, and TOGLINE draw 
lines in the stack display: 


LINEON #50B17h 
Draws a line in the stack display 

<xj> <y1> <x2> <y2> > 
LINEOFF #50BO08h 


Clears a line of pixels in the stack display 

<xj> <yj> <x2> <y2> > 
TOGLINE #50AF9h 
Toggles a line of pixels in the stack display 

<xXj> <yi> <xX2> <y2> > 





Pixel Control. The User-RPL commands PIXON, PIXOFF, and 
PIX? clear, set, and test pixels in the graphics display. Their System- 
RPL counterparts for the stack display have similar names: 


PIXON #1384Ah 
Turns on a pixel in the stack display 
<x> <y>-> 


PIXOFF #1383Bh 


Turns off a pixel in the stack display 

<x> <y>7> 
PIXON? #13992h 
Tests a pixel in the stack display 

<x> <y>— FLAG 





The PIXON? object returns an internal flag, which may be converted 
into a real number O or 1 with the System-RPL command 
COERCEFLAG. 
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Menu Graphics. The following objects create menu label grobs 
(8 pixels high by 21 pixels wide) given a string as input: 


MakeStdLabel #3A328h 
Creates a standard label 

“string” —  grob 
MakeDirLabel #3A3ECh 
Creates a directory label 

“string” —  grob 


MakeBoxLabel #3A38Ah 
Creates a label with a “mode box” at the right side 

“string” — grob 
MakeInvLabel #3A44Eh 
Creates an outline box label 

“string” —  grob 





The objects DispMenu and DispMenu.1! display the current menu: 


DispMenu #3A1E8h 
Displays the current menu and freezes the menu display line 
era 


DispMenu.1 #3A1FCh 
Displays the current menu 





These objects are useful for updating the menu display without using 
the HALT or WAIT commands: 


* .. € menu 3 TMENU #3A1FCh SYSEYVAL ... 
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Keyboard Control 
Several objects are available to provide extra control over key detection 
and maintenance of the key buffer. 


Waiting for a Key. The User-RPL command WAIT returns a key 
location in RC.P format, but does not return the key. If you 
wish to trap the key, WaitForKey is the right tool for the job. 
WaitForKey places the HP 48 in light sleep to conserve batteries, 
processes alarms, and waits for keyboard activity. WaitForKey 
processes the shift keys, maintains the shift annunciators, and returns 
the key press expressed as two bints — a shift plane and a keycode. 


WaitForKey #41F65h 


Waits for a fully formed keyboard event 
— <keycode> <plane> 





Keycodes are returned in the range <ld> to <49d> (starting in the 
upper-left corner of the keyboard), and planes are returned in the range 
1 to 6: 


Unshifted 
Left-shifted 
Right-shifted 
Alpha 

Alpha left-shifted 
Alpha right-shifted 





To convert a result to RC.P format (suitable for user key assignments), 
use the object CodePl>%rc.p: 


CodeP|>%rc.p #41D92h 


Converts keycode and plane bints into real number rc.p key address 
<keycode> <plane> — %rc.p 
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The Key Buffer. The object KEYINBUFFER returns an internal flag 
that indicates whether a key has been pressed. 


KEYINBUFFER? #42402h 


Returns TRUE if a key is waiting in the keybuffer 
— FLAG 





Use the object COERCEFLAG to convert the internal flag into a real 
number 0 or 1. Remember that the call to COERCEFLAG needs to be 
enclosed in an extra set of program delimiters. 


The program CKKB uses the objects KEYINBUFFER? and 
COERCEFLAG to check the state of the key buffer. CKKB returns the 
real number 0 if no key has been pressed, or | if a key has been 
pressed: 


CKKB 64.5 Bytes Checksum #43E7h 
=> T/F 
4 


#42462h SYSEVAL Check the key buffer 


*« #538G6Eh SYSEVAL * EVAL Convert flag to 0 or I 
» 


To detect whether the key has been pressed, use the object 
ATTN?. This object will not affect the key buffer. 


ATTN? #42262h 


Returns TRUE if (CANCEL) has been pressed. 
— FLAG 
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Alpha-Lock. The INPUT command provides an option to specify 
alpha-lock on the keyboard, but there may be other times that you wish 
to insure that alpha entry mode is either enabled or disabled. Two 
objects are available for this: 


LockAlpha #40D25h 
Locks alpha entry mode 


UnLockAlpha #40D39h 


Unlocks alpha entry mode 

= 
1A/LockA #3AA0Ah 
Locks alpha entry for one keystroke (same as pressing (a) once) 

> 





The MatrixWriter. The MatrixWriter can be started from a program 
by executing either DoNewMatrix to create a new matrix or 
DoOldMatrix to edit a matrix on the stack. 





DoNewMatrix #44C3 1h 


Starts the Matrix Writer 












— [[matrix]] If terminated with (ENTER 
> If terminated with (CANCEL 










DoOldMatrix #44FE7h 
Edits matrix 
[{matrix]] — [[matrix]]? TRUE  [f terminated with 


[{matrix]] — FALSE If terminated with 
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Streamlining Finished Programs 

Once you have perfected a new program that you plan to use 
frequently, you may want to make the program smaller and faster. The 
use of system objects can be streamlined by replacing the user binary 
integers and SYSEVAL commands with a single 2-1/2 byte address of 
the proper System-RPL object. This can be done with the program 
CMP48. Once streamlined, the program will be smaller and faster. 


The core of the streamlining strategy is embodied in a small piece of 
assembly language code which is created by converting a string object 
into an assembly language code object. This operation is critical, so 
please double check the checksum of CMP48 before you use it. 


The code object and the SYSEVAL command are stored in local 
variables syseval and code, then each object in the program is examined 
to see if a conversion is needed. The procedure used is similar to the 
program example SFILT in the section Meta-Objects. If a SYSEVAL 
command is found, it is dropped and its address argument is converted 
into an object address. If a program object is found, it is streamlined 
using CMP48. Note that CMP48 fails if an address is not found before 
the SYSEVAL command. 


This recursive approach carries a minor inefficiency — each time 
CMP48 is executed, the code object is recreated. This program accepts 
this cost to permit the entire process to be contained in a brief program 
that can be entered from the keyboard. 


To use CMP48, place the program to be streamlined into level 1 and 
execute CMP48. The resulting program may be stored in a variable 
and executed like any other program. When the streamlined program is 
displayed on the stack, the SYSEVAL commands are replaced by the 
word External. 


WARNING 
Once a program has been streamlined, it cannot be 


edited. For this reason, it’s a good idea to keep a 
copy of the original program in a safe place. When in 
doubt, back up your HP 48 before using CMP48. 
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CMP48 550.5 Bytes Checksum #4142h 


x 


IF DUP TYPE 8 # 
THEN 514 DOERR 
END 
6 SWAP 
NEWOB 
#54AFhH SYSEVAL 
#18DBFh SYSEVAL 
< SYSEVAL 3 1 GET 
2660 8 TO 18 65 26 21 
49 52 26 113 115 23 65 
""" 1 14 START 
SWAP CHR + NEXT 
11724 #18CEAh SYSEVAL 
#5AB3Sh SYSEVAL 
+ syseval code 
€ 
WHILE DUP @ # 
REPEAT 
1 - SWAP 
IF DUP TYPE 8 == 
THEN CMP48 
ELSE 
IF DUP syseval == 
THEH DROP 1 —- SWAP 


B+R #18CEANH SYSEVAL 


code EVAL 
END 
END 


OVER DUP 4 + PICK + 3 + 
ROLLD DUP 2 + ROLL 1 + 


OVER 2 + ROLLD 
END DROP 
#18CEAH SYSEVAL 
#5445h SYSEVAL 
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Is this a program? 
Bad Argument Type if not 


Empty meta-ob in pos 2 
Ensure program is unique 
INNERCOMP 
UNCOERCE 

Place SYSEVAL on stk 
Code object data 


Accumulate data into 

a string 

COERCE code prologue 
CHANGETYPE 


Loop for every ob in prog 


MDT 
If this is a program 
then compact it too 


If we have a SYSEVAL 
throw it away, get address 


and COERCE it to a bint 
Convert bint to address 


MAH2 


Loop end 
COERCE 
iN 
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The data for the string has been compiled using HP’s SASM assembler 
(see HP Tools). The object CHANGETYPE (#05AB3h) requires an 
object in level two and a bint with the new object prologue in level 1. 


To satisfy the advanced user of the HP tools and the curious, the 
assembly language source code for the original code object reads: 


NIBASC \HPHP48-A\ 
NIBHEX CCD20 
REL (5) end 
C=DAT1 A 
CD1EX 

D1=D1+ 5 
A=DAT1 A 
D1=C 

DATI1=A A 
A=DATO A 
DO=D0+ 5 
PC=(A) 


end 


When assembled with the SASM assembler mentioned below, this code 
produces the code object used by CMP48. The code should be 
assembled with the command SASM -H filename. 


LIBEVAL 

Approximately half of the HP 48 operating system is implemented with 
libraries, which requires a different access method. Access to objects 
in libraries is possible through XLJB names (object type 14). To create 
an XLIB name, use the system object #>ROMPTR: 


#>ROMPTR #7ESOh 


Creates an XLIB name from two internal binary integers 
<library no.> <objectno.> — XLIB_name 
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You can evaluate a library object by placing two internal binary 
integers on the stack, executing #>ROMPTR, then EVALing the 
resulting XLIB name. 


The function LIBEVAL simplifies the process used to evaluate objects 
in a library. The parameter to LIBEVAL is a user binary integer, just 
like SYSEVAL. In the case of LIBEVAL, the integer must contain six 
(hex) digits. The upper three digits specify the library number, and the 
lower three digits specify the number of the object within the library. 
Objects in libraries are numbered beginning with 0. It is important to 
remember that LIBEVAL is a command like any other, and saves its 
last argument (if flag —55 is clear), not the arguments processed by the 
system object. 


Example: The Multiple Equation Solver saves its equations, title, 
variable status, and progress information in the reserved variable Mpar. 
This variable is a Library Data object, and its contents are not visible. 
To recall the contents of Mpar, execute the MESRclEgqn, which is the 
18th object in library E4 (XLIB 228 18): 


MESRclEqn #E4012h XLIB 228 18 


Recalls the contents of the reserved variable Mpar 
— { equation list } 





#0E4012h LIBEVAL — { equation list } 


Example: The program MSGBX (on the next page) uses the system 
object DoMsgBox (XLIB 177 0) to display a message box with an 
included graphics object. MSGBX requires a string in level 2 and a 
grob in level 1. In theory, the grob may be as wide as the message box, 
but in practice a smaller grob will leave more room for message text. 










DoMsgBox #B1000h 
Displays a message box with a graphics object 
“message” #maxwidth #minwidth grob menuob > TRUE 


XLIB 1770 
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The parameters are defined as follows: 


“message” 


#maxwidth 


#minwidth 


grob 


menuob 


A string containing the message you wish to display. 
Carriage-returns may be embedded to force line breaks. 


An internal binary integer specifying the maximum 
character width of each text line in the message box. 


An internal binary integer specifying the minimum 
character width of each text line in the message box. No 
word breaks occur before the minimum character width. 


A graphics object to be displayed in the upper-left corner 
of the message box. 


A message box menu object, usually specified in the form 
XLIB 177 2. Library object names (object type 14) can 
be created using the system object #>ROMPTR. 


DoMsgBox returns the internal flag TRUE. You may wish to 
experiment with different values for the minimum and maximum 
character widths. Neither value should exceed 15. Remember to leave 
room for the grob. 


MSGBX 123.5 Bytes Checksum #E966h 


“string” grob > 


& 


le 
14 


Maximum character width 
Minimum character width 


#194F Th SYSEYAL Use COERCE2 to convert to bints 


ROT 
177 2 


Move grob into position 
Menu object is in library 177, function 2 


#194F 7h SYSEYAL Use COERCE2 to convert to bints 
#7ES@h SYSEVAL Use #>ROMPTR to convert 2 bints to XLIB 
#B1i606h LIBEYAL Execute DoMsgBox 


DROP 


Drop returned TRUE flag 
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Try MSBGX with the program TRYMBX: 


TRYMBX 87 Bytes Checksum #F68Fh 


< 
"Calculation Complete!" 
GROB 11 11 8F004010202010409840104010409840272040108F00 
MSGBH 

* 





HP Tools 

Hewlett-Packard has developed tools for HP 48 software development 
that run on a DOS-compatible personal computer. These tools provide 
documentation and programming possibilities beyond those discussed 
in this chapter. The tools are: 


RPLCOMP ~ Acompiler for the internal RPL language 


SASM The Saturn assembler 

SLOAD The Saturn loader 

MAKEROM A utility for building libraries from System-RPL code 
USRLIB A utility for building libraries from user directories 


These tools and documentation are provided on an “as-is” basis, and are 
not supported by HP (or the author). You can find these tools on the 
bulletin board mentioned in the HP 48 User’s Guide. 
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System Operations 


Invoking System Operations 
To invoke a system operation, press and hold (ON), then press and 
release the second key, then release (ON). 


(ON) (AJand [F) Erases all memory (including port 0 and merged 
memory) and performs a warmstart (see (C)). 
Merged memory remains merged. 


Cancels the current selection if selected before all 
keys are released. 


Often known as a system halt or a warmstart, this 
operation places the calculator in a known state 
without resetting user memory. The stack is cleared, 
the VAR directory is set to HOME, the MTH menu is 
displayed, User mode is cleared, PICT is cleared, and 
the system configuration is updated to recognize all 


libraries. 
(0) Starts the interactive self test (see below). 
©) Runs a continuous self test. 
Coma mode: a deep-sleep shutdown which turns off 


the system timers (including the clock) and clears the 
system halt log. 


Performs a graphics screen dump in HP 82240A/B 
graphics format (regardless of the I/O port selection). 


or?) Adjusts the display contrast 


TIME Cancels the next repeating alarm. 
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System Halt Log 
The command WSLOG returns four strings to the stack showing the 
cause, date, and time of the four most recent system halt events. The 
system halt log is not cleared when memory is erased, and may only be 
cleared by placing the calculator in coma mode. 


Example: 3-63766790 @9:36: 14 


This string shows a type 3 system halt that occurred on the morning of 


March 6, 1990. 


0 
1 
2 
3 
4 
5 
7 
8 
9 
A 
B 
C 
D 
E 
F 


Coma exit 

Low battery system save 
I/O timeout 

Execute through address 0 
Corrupt system time 

Port change data 

Corrupt CMOS test word 
Hardware failure 

Corrupt alarm list 

Corrupt memory 

Module pulled 

Hardware reset 

Missing RPL error handler 
Corrupt configuration table 
System RAM card pulled 





Note: Some events will cause two events to be recorded, and some 
system halt events will cause memory to be cleared (see (F)). 
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Interactive Self Test 
The (ON)(D) sequence enters the HP 48 interactive self test. Once the 
test has been started, there are a variety of options: 


Displays the CPU speed 
Press for display test patterns 
Internal ROM check 
Internal RAM check 
Keyboard test 
Partial keyboard test 
ESD test monitor. Bars indicate battery status. 
UART loop back test 
Wired UART echo 
Shows what’s plugged in 
Test port RAM devices 
Blank display 
Send system time from IR port 
Receive system time from IR port 
Wireless loop back 
Wireless UART echo 
Show test start time 
Show test fail time 
Looping test 
Looping test 
Looping test 
Looping test 
TER) Initialize test times 
Looping test 
Looping test 
L Test summary 


INE PssSGoesO280R0°RR0R000R8) 


Press (system halt) to return to the stack display. 
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Statistics Data 


Data used by the STAT application resides in or is named by the 
reserved variable DAT. Statistics data may be entered from the stack 
one point at a time using [4) CATA +, oranentire matrix 
can be stored into XDAT using the STOY command. The command 
EDIT> may be used to edit XDAT using the MatrixWriter. 


= 


E+ and =Z- operate as follows: 


x =+ — Append one data point with one 
coordinate value 
=- — Reverses the effect of the last }'+ 
[Xj Xp... Xp] =+ — Append one data point with m 
coordinate values 
[[Xq1 Xy2-.. Xim] 
a =+ — Append n data points with m 
(Xn1 Xn2 --» Xam] coordinate values 


DAT 


The variable DAT contains either a statistics data matrix or the name 
of a variable containing a statistics data matrix. 


XDAT Statistics Matrix 
Coordinate Number 


1 2 3 4 m 
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XPAR 


The reserved variable PAR contains plot and scaling information. 
Each directory may contain a unique SPAR. The entries for the 
independent and dependent columns may be set using the COLY 
command. 


Intercept of current regression model 
Slope of current regression model 


Current model: LINFIT, EXPFIT, LINFIT 
PWREFIT, or LOGFIT 


esos 2] 
a 
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Character Codes 


SOCMIDNAWNHFO 
CACHTOMmMIOVIS 


—_ 
— 


wor nonhowe os: 


rU YONA KECCAMAN VO 
Bevoe-oanNnw KCC CFM THO VIAD SY roe TO trTAaANnNT 


w Jw Il “woo 
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DEC rT CHR| DEC = CHR| DEC = CHR} DEC = CHR 


tun -- KOM A - 


lik we 


1 


. wmH a 


La mI 


4 
x 
v 
f 
t 
= 
b 
T 
ro) 
Z 
& 
z 
a 
> 
Ca 
+ 
t 
+ 
é 
€ 
y 
8 
~ 
P 
a 
T 
W 
4 
T 
R 
oO 





wi Tus C: Ce Cs Ce el OO: Oe OF Os OF Je BP ee es ee OD oe oh OY RR Oe oe OR Oe Ob oF 


QracoeaG WX OR Oo OO R&P eo ee ee ee OT: Oh MF OD ROIs D: TR Ie Th IF 


AF YI ee 
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Data Transfer 


Any named object, such as a variable, backup object, or complete 
directory, may be transferred to another HP 48 or a computer. A 
complete backup of user memory may also be transferred to another 
HP 48 or a computer. 


Note: Binary data, such as programs and libraries, may be transferred 
from a HP 48S/SX to a HP 48G/GX, but programs or libraries designed 
for the HP 48G/GX may not work on an HP 48S/SX. 


Data Transfer Methods 
There are three methods of transferring data between the HP 48 and 
another HP 48 or computer: 


¢ Objects may be transferred between HP 48s using the infrared (IR) 
link. The IR link is fixed at 2400 baud, no parity, and may be used 
to transfer data in either ASCII or binary mode. 


¢ Objects may be transferred between a computer and an HP 48 
using the serial (wire) link. The wire link may be configured to 
support a variety of baud rates and parity options. The Kermit 
protocol provides the most reliable transfer mechanism, but the 
Xmodem transfers are fastest for binary downloads of large 
objects. 


¢ Plug-in RAM cards may be configured as independent memory 
and exchanged between HP 48s. The commands FREE1, 
MERGE 1, and PINIT are used to configure RAM cards. Only 
library and backup objects can reside in independent memory. 
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Kermit Protocol 

The Kermit file transfer protocol ensures. correct data transmission 
between two HP 48 calculators or an HP 48 and a computer. Kermit 
was developed at the Columbia University Center for Computing 
Activities. Detailed information about Kermit is available in a book by 
Frank da Cruz, KERMIT, A File Transfer Protocol, 1987, Bedford, MA 
(Digital Press). For 9600 baud transfers, it’s best to disable the 
updating clock display. 


Kermit Configurations. Kermit protocol provides two basic 
configurations for data transfer: 


Local/Local Commands must be entered on both machines to effect 
a transfer: a SEND command must be issued on the 
sender, and a RECEIVE (RECV or RECN on the 
HP 48) command must be issued on the receiver. New 
commands must be issued for each object transferred. 
(Some implementations of Kermit permit “wildcard” 
characters to send a series of files with one command.) 


Local/Server One machine is placed in server mode, which acts upon 
commands received from the sender. The server: 


¢ Transmits an object when it receives a GET 
command with a file name. 


® Receives an object when it receives a SEND 
command. 


© Exits Kermit when it receives a FINISH command. 


The server may respond to multiple transfer requests 
without keyboard intervention. 
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Remote Kermit Operation. The HP 48 can respond to several 
Kermit commands when in server mode. These commands initiate 
actions, list variables, or transfer data. 


GET: The Kermit command GET name instructs the HP 48 server to 
transmit the contents of the named variable to the computer. 


SEND: The Kermit command SEND name instructs the HP 48 server 
to receive the contents of the named computer file and store them in a 
variable of the same name. 


REMOTE DIR: The Kermit command REMOTE DIR (packet GD) 
causes the HP 48 server to reply with the current directory path, the 
number of bytes of free memory, and then a separate line for each 
variable in the current directory. Each line contains the variable name, 
length in bytes, type, and a decimal checksum. Examples: 


| Name | Length | Type | _ Checksum _| 


Real Number 


Algebraic 
Directory 
List 





REMOTE HOST: The Kermit command REMOTE HOST (C ”host- 
command” packet) may be used to execute HP 48 commands from the 
computer. After the command has been executed, the HP 48 replies by 
returning the stack contents. The stack is formatted in a manner similar 
to the PRSTC (print stack compact) command. For instance, to add 
two numbers on the HP 48, type “REMOTE HOST 2 3 +”. Assuming a 
previously empty stack, the HP 48 replies with the string "15 a”. 
If the stack is empty, the HP 48 replies "Empty Stack”. 


FINISH: The Kermit command FINISH transmits the GF packet to the 
HP 48 to turn off server mode on the HP 48. The GL packet, 
associated with logout commands, has the same effect. 
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Backing Up the HP 48 
The ARCHIVE and RESTORE commands may be used to save and 
recover the contents of user memory on a computer. 


Note: ARCHIVE does not save the user and system flags, or the 
contents of port 0. The flag settings may be preserved by executing 
RCLF and storing the flags in a variable. After doing a restore, recall 
the contents of the variable and execute STOF. 


To back up all of user memory to a computer, perform the following 
steps: 


® Connect the HP 48 and the computer. 


© Use the (4) IOF AF menu to set wire transmission mode, 
the baud rate, parity, and checksum settings. 


® Optional: Execute RCLF and store the flags in a variable. 


° Enter the object ! IO! name, where name is the computer file 
name that will contain the HP 48 archive. For 9600 baud 
transfers, it’s best to disable the updating clock display. 


¢ Issue the Kermit RECEIVE command on the computer. 


© Execute ARCHIVE on the HP 48. 
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Restoring the HP 48 


CAUTION 


The RESTORE command erases the entire contents 
of user memory. 





To restore HP 48 memory from an archive on a computer, perform the 
following steps: 
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Be sure there is enough memory available to hold the 
incoming file. Since RESTORE will replace all of user 
memory, you might as well purge all variables. 


Connect the HP 48 and the computer. 


Transfer the file containing the memory image to the HP 48 
the same was as for any file. 


Put the file name on the stack and execute RCL. This puts 
Backup HOMEDIR in level 1. 


Execute RESTORE. 


Optional: Recall the variable containing the user and system 
flags and execute STOF. 
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ASCII File Transfer 


An ASCII file generated on a computer provides an alternative method 
for entering data or a large program in the HP 48. To ensure that the 
data is interpreted correctly by the receiving HP 48, the following 
header string should be included which indicates the expected modes: 


“AHP! T¢ translation} A‘ angle mode}F ¢ fraction-mark} 3 


The codes are defined as follows: 





T See Character Translations | 0, 1, 2, or 3 1 
A Sets the angle mode D, R, orG D 
F Sets the fraction mark , Or. ‘ 


The HP 48 will ignore text between two @ characters or between an @ 
character and the end of a line in the computer file. 


Example: The following text on a computer may be transferred to the 
HP 48 in ASCII mode to create a program that returns the area and 
volume of a sphere given its radius. Notice the use of character 
translations to represent various HP 48 characters: 


S%HP: T(3)A(D)F(.); 

\<< \-> r \<< @ Comment information 
4 \pi \->NUM * r 2 * * “Area” \->TAG 
4 3 / \pi \->NUM * r 3 * * “Volume” \->TAG 
\>> 

\>> 


On the HP 48, the program looks like this: 


x 
SHUM *¥ r 2 * * "Area" +TAG 


er 
«dt 
43 7 7 NUM ¥ r 3 * ¥ "Yolume" 3TAG 


¥ 
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Character Translations 

When data is transferred between the HP 48 and a computer using 
translate code 2 (000-4159) or 3 (000-4255), conversions are used to 
represent some characters. 


For data being transferred to a computer with translate codes 2 or 3, 
each * is replaced with **. For data being transferred to the HP 48, 
characters may be converted using a text conversion or “xxx, where xxx 
is the three-digit (decimal) character code. 


The following table shows the text conversions for characters above 
code 127. 


DEC HEX _HP48_ ASCII | DEC HEX HP48_ ASCII 


oe FS eHNAerepecaAagwyY os 


+tOGa kK ¥ FE 





« 
x 
? 
f 
t 
= 
» 
T 
4 
Z 
x 
z 
x 
> 
oo 
+ 
t 
4 
4 
€ 
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IOPAR 

The reserved variable JOPAR may only reside in the HOME directory. 
Other variables of the same name in subdirectories will be ignored by 
the /O commands. 


IOPAR 
{ baud parity receive-pacing transmit-pacing checksum translate-code } 


baud 1200, 2400*, 4800, or 9600 

parity 0=none*, 1=odd, 2=even, 3=mark, 4=space 
Negative parity value = transmit only 

receive-pacing} —_| Value # 0 sends XOFF if HP 48 buffer full 


transmit-pacingt | Value #0 stops transmission if XOFF 
received 

checksum 1=1 digit arithmetic, 2=2 digit arithmetic, 
3=CRC 

translate-code 0=none, 1=LF to CR-LF, 2=128-159, 
3=128-255 


*IR is 2400 baud, no parity only | {Not used by Kermit 
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Cables 

Serial cables are available for a PC (HP FIO15A) or an Apple 
Macintosh computer (HP F1016A). Connectivity kits include both a 
cable and data transfer software — HP F1201A for the PC, HP F1202A 
for the Macintosh. 


5 — RX (input) 
4-—SGND 


Macintosh end 3 — TX (output) 











7-SGND 
3 — RX (input) 
2 — TX (output) 
PC end with adapter 1 — SHIELD 
13 1 
lo oomeomomenoxokomeoneoxenke) 
OODQ00D0000000 
25 14 
5 —-SGND 
3 — TX (output) 
2 — RX (input) 





ooaodoaodqg 


HP 48 cable end 


| Lm | — SHIELD 
2 — TX (output) 
3 — RX (input) 


4-—SGND 
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Printer Control 


The following system flags (default clear) control output to the printer 
as follows: 


IR printer Serial printer 


Single-spaced | Double-spaced 
-38 Line feeds No line feeds 





The following control codes guide the operation of the HP 82240B 
printer: 


Carriage right 

Carriage return/LF 
Column graphics 

Roman 8 character set £ 
ISO 8859-1 character set 


Underline off £ 
Underline on 
Single wide print ¢ 
Double wide print 
Self—test 

Reset 





“Decimal value tl<=n<=166 +Default mode 


Codes 248 and 249 were not included in the original HP 82240A 
printer. Characters 148 and 160 were blank on early versions of the 
HP 82240A printer. The HP 48 character set can be remapped to match 
the HP 82240A printer with the OLDPRT command. 


Printer Control 217 


Example: The program COL82 prints a simple graphics pattern on 
the HP 82240. 


Example 





255 197 171 149 169 213 163 255 


COL82 154.5 Bytes Checksum #E8EDh 


g 


27 8 8-byte graphics command 
255 197 171 149 Graphics data 
169 213 163 255 
"" 1° 16 START Loop start 
SHAP CHR SWAP + Accumulate data 
NEXT PR1 Loop end, print graphics 
DROP 
* 
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PRTPAR 

The reserved variable PRTPAR may only reside in the HOME 
directory. Other variables of the same name in subdirectories will be 
ignored by the print commands. 


PRTPAR 


{ delay “remap” linelen “lineterm” } 


| Parameter| Description | Default | 


delay Time required to print line: 0 < t < 6.9 
seconds 
“remap” Character set remapping string 






linelen Serial print line length 
“Jineterm”’ Serial print line terminating characters 
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Messages 


This chapter lists many of the messages built into the HP 48. Messages 
not listed are those that support the various input form user interfaces. 
The number ranges for those messages are listed at the end of this 
chapter. 


A message number supplied to the command DOERR stops a program 
and displays the specified message number. The System-RPL object 
JstGETTHEMSG returns a message (see System Programming). 


| Hex | Dec | GeneralMessages__ 


Insufficient Memory 
Directory Recursion 
Undefined Local Name 
Undefined XLIB Name 
Memory Clear 

Power Lost 

Warning: 

Invalid Card Data 


OAMDNNDMNPWNK 


Object In Use 
Port Not Available 


No Room in Port 

Object Not in Port 
Recovering Memory 

Try To Recover Memory? 
Replace RAM, Press ON 
No Mem To Config All 
No Room to Save Stack 
Can't Edit Null Char. 
Invalid User Function 
No Current Equation 
Invalid Syntax 
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| Hex | Dec | ObjectTypes_ | 
Real Number 
Complex Number 
String 
Real Array 
Complex Array 
List 
Global Name 
Local Name 
Program 
Algebraic 
Binary Integer 
Graphic 
Tagged 
Unit 
XLIB Name 
Directory 
Library 
Backup 
Function 
Command 
System Binary 
Long Real 
Long Complex 
Linked Array 
Character 
Code 
Library Data 
External 





Messages 


| Hex | Dec | GeneralMessages _| 
Null message 
LAST STACK Disabled 
LAST CMD Disabled 
HALT Not Allowed 
Array 
Wrong Argument Count 
Circular Reference 
Directory Not Allowed 
Non-Empty Directory 
Invalid Definition 
Missing Library 
Invalid PPAR 
Non-Real Result 
Unable to Isolate 


No Room to Show Stack 


Warning 
Error: 


Purge? 

Out of Memory 
Stack 

Last Stack 

Last Commands 
Key Assignments 
Alarms 

Last Arguments 
Name Conflict 
Command Line 


Too Few Arguments 
Bad Argument Type 
Bad Argument Value 
Undefined Name 
LASTARG Disabled 
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| Hex | Dec | EquationWriter___| 
206 518 | Incomplete Subexpression 
207 519 | Implicit ( ) off 

208 520 | Implicit ( ) on 













| Hex | Dec | Floating PointErrors _| 
Positive Underflow 
Negative Underflow 
Overflow 
Undefined Result 
Infinite Result 


Invalid Dimension 
Invalid Array Element 
Deleting Row 


Deleting Column 
Inserting Row 
Inserting Column 


Invalid ©) Data 
Nonexistent }DAT 
Insufficient © Data 
Invalid SPAR 

Invalid © Data LN(Neg) 
Invalid ©, Data LN(O) 
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223 


| Hex | Dec | Plot, Solve, Stat____ 
Invalid EQ 
Current equation: 
No current equation. 
Enter eqn, press NEW 
Name the equation, press ENTER 
Select plot type 
Empty catalog 
undefined 
No stat data to plot 
Autoscaling 
Solving for 
No current data. Enter 
data point, press >'+ 
Select a model 


No alarms pending. 
Press ALRM to create 
Next alarm: 


Past due alarm: 
Acknowledged 

Enter alarm, press SET 
Select repeat interval 


I/O setup menu 

Plot type: 

(OFF SCREEN) 

Invalid PTYPE 

Name the stat data, press ENTER 
Enter value (zoom out 

if >1), press ENTER 
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| Hex | Dec | I/O, Plot, Solve, Stat 


Copied to stack 

xX axis zoom w/AUTO. 
X axis ZOOM. 

y axis zoom. 

x and y-axis zoom. 
IR/wire: 
ASCII/binary: 
baud: 

parity: 

checksum type: 
translate code: 
Enter matrix, then NEW 
Bad Guess(es) 
Constant? 
Interrupted 

Root 

Sign Reversal 
Extremum 

Left 

Right 

Expr 









| Dec | Unit Management 


| Hex | 
Bol 2817 | Invalid Unit 
BO2 2818 | Inconsistent Units 
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| Hex | Dec | I/O and Printing 


Bad Packet Block Check 
Timeout 

Receive Error 
Receive Buffer Overrun 
Parity Error 

Transfer Failed 
Protocol Error 

Invalid Server Cmd. 
Port Closed 
Connecting 

Retry # 

Awaiting Server Cmd. 
Sending 

Receiving 

Object Discarded 
Packet # 

Processing Command 
Invalid IOPAR 
Invalid PRTPAR 

Low Battery 

Empty Stack 

Row 

Invalid Name 


Invalid Date 
Invalid Time 
Invalid Repeat 





Polynomial Root Finder 
C001 | 49153 | Unable to find root 
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| Hex | Dec | Multiple Equation Solver 


Invalid Mpar 

Single Equation 

EQ Invalid for MINIT 
Too Many Unknowns 
All Variables Known 
Illegal During MROOT 
Solving for 

Searching 


| Start | End | Unlisted Message Numbers 


Miscellaneous 

I/O operations 
Statistics 

Time system 
Symbolic operations 
Plotting 

Solver 

Constants Library 
Equation Library 
Minehunt game 


Messages 
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Menus 
Custom Menus 


A custom menu may be created using a list of objects supplied to the 
MENU or TMENU commands. 


< Key, Key. Key;... + 


The objects that define each key in the menu may range in complexity 
from a real number to a list definition with a graphics object for the 
menu key label and separate actions for the primary and left- or right- 
shifted planes. 


The Variable CST. The MENU command stores the definition in the 
reserved variable CST and immediately displays the menu. Each 
directory may have a different variable CST. A name may be stored in 
CST which references a variable containing the menu definition. The 
TMENU command does not affect CST. 


Menu Contents. Menus may contain any object, but the functionality 
of the key is determined by the type of the object: 


© Names work the same way as the VAR menu. 
¢ Keys with string definitions echo the string. 

© Directory names change to the directory. 

© Unit objects act as unit catalog entries: 


© Primary keys append the unit on the key to the numerator of the 
level 1 object. 


© Left-shifted keys convert the level 1 object to the unit on the key. 


© Right-shifted keys append the unit on the key to the denominator 
of the level 1 object. 


© Backup objects act like the port 0, 1, and 2 menus. 


© Labeled objects can be used to identify menu key actions and can 
provide optional shifted functionality. 
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Labels. A menu key can have a label that is different than its key 
action. The most versatile key definition provides separate objects for 
the label, primary, left-shifted, and right-shifted actions. Either a string 
or a graphics object 8 rows high by 21 columns wide may be supplied 
as the label. 


Example: The following list contains a menu definition for six keys: 
a variable, string, unit object, labelled program, a definition that uses a 
graphics object for the menu label, and labelled key definition with 
shifted functionality: 


MENUEX 226.5 Bytes Checksum #C051h 


£ 
x 
"HELLO" 
1_m*3 
{ "PRG" «€ 2* 3+ % 3 


GROB 21 8 0000000404000A0A0005151080A020FFFFF100F100004000 
"Kilroy was here!" 


3 
€ "CPL" 
{ 
* CPL primary action 
* 'CPL' STO * left-shifted action 
* 'CPL' RCL ® right-shifted action 
3 
3 
3 


HOME } 


i 
4 
a 
2 
1 





ee 


Two more extensive examples of custom menus can be found in the 
Customizing the Solver example in Example Programs. 
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Built-In Menus 
The commands MENU, TMENU, and RCLMENU store and recall 
menu numbers in the form mm.pp, where mm is the menu number and 


pp is the page number. The first two tables list menu numbers for the 
HP 48G/GxX, the third table lists menu numbers for the HP 48S/SX. 


HP 48G/GX Menu Numbers 
| # | MenuName | # | |= =MenuName | 


LAST Menu (4) SOLVE ROOT SOLVR 
PRG WHILE 


MTH VECTR 

MTH MATR PRG LIST ELEM 
MTH MATR MAKE PRG LIST PROC 
MTH MATR NORM PRG GROB 

MTH MATR FACTR PRG PICT 

MTH MATR COL PRG IN 

MTH MATR ROW PRG OUT 

MTH LIST PRG RUN 

MTH HYP (Pp) UNITS 

MTH PROB (P) UNITS LENG 
MTH REAL (P) UNITS AREA 
MTH BASE (P) UNITS VOL 
MTH BASE LOGIC (P) UNITS TIME 
MTH BASE BIT 

MTH BASE BYTE 

MTH FFT 

MTH CMPL (?) UNITS ENRG 
MTH CONS (P) UNITS POWR 
PRG (?) UNITS PRESS 
PRG BRCH (?) UNITS TEMP 
PRG IF (?) UNITS ELEC 
PRG CASE (P) UNITS ANGL 
PRG START (P) UNITS LIGHT 
PRG FOR (P) UNITS RAD 
(4) EDIT (P) UNITS VISC 
PRG DO (4) UNITS 


OANDNAHPWNK CO 
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HP 48G/GX Menu Numbers (cont. 
| __MenuName | # | ~=MenuName__ 


PRG ERROR IFERR 








































(4) PLOT STAT YPAR 






















































PRG ERROR (4) PLOT STAT YPAR MODL 
(—) CHARS (4) PLOT STAT DATA 
(—) MODES (q) PLOT FLAG 

(4) MODES FMT (—) SYMBOLIC 

(4) MODES ANGL (4) TIME 

(<—) MODES FLAG (4) TIME ALARM 

(4) MODES KEYS (4) STAT 

(4) MODES MENU (—) STAT DATA 

(—) MODES MISC (4—) STAT SPAR 

(q—]) MEMORY (—) STAT SPAR MODL 
(4) MEMORY DIR (—) STAT 1VAR 

(4) MEMORY ARITH (4) STAT PLOT 

(4) STACK (4) STAT FIT 

(—) SOLVE (—) STAT SUMS 

(—) SOLVE ROOT 

(4) SOLVE DIFFEQ 

(4) SOLVE POLY (4) IO IOPAR 

(—) SOLVE SYS (4) IO PRINT 

(<q) SOLVE TVM (—) IO PRINT PRTPA 
(q) SOLVE TVM SOLVR (4) IO SERIA 

(4) PLOT (4) LIBRARY 

(4) PLOT PTYPE (—) LIBRARY PORTS 
(4) PLOT PPAR (—) LIBRARY 

(4) PLOT 3D (—) EQ LIB 

(4) PLOT 3D PTYPE (4) EQ LIB EQLIB 

(4) PLOT 3D VPAR (4) EQ LIB COLIB 

(q) PLOT STAT (4) EQ LIB MES 





(4) PLOT STAT PTYPE (4) EQ LIB UTILS 
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HP 48S/SX Menu Numbers 
| # | =MenuName | # | | MenuName | 
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OMAANIDNAWNK CO 


LAST Menu 
CST 

VAR 

MTH 

MTH PARTS 
MTH PROB 
MTH HYP 
MTH MATRX 
MTH VECTR 
MTH BASE 
PRG 

PRG STK 
PRG OBJ 


V/O SETUP 

(—) MODES 

(P) MODES 

(—) MEMORY 

(P) MEMORY 

(4) LIBRARY 
LIBRARY PORT 0 
LIBRARY PORT 1 
LIBRARY PORT 2 
(4) EDIT 

(—) SOLVE 


SOLVE SOLVR 
(4) PLOT 
PLOT PTYPE 
PLOT PLOTR 
(4) ALGEBRA 
(4) TIME 
TIME ADJST 
TIME ALRM 
TIME ALRM RPT 
TIME SET 

(4) STAT 
STAT MODL 
(4) UNITS 
UNITS LENG 
UNITS AREA 
UNITS VOL 
UNITS TIME 
UNITS SPEED 
UNITS MASS 
UNITS FORCE 
UNITS ENRG 
UNITS POWR 
UNITS PRESS 
UNITS TEMP 
UNITS ELEC 
UNITS ANGL 
UNITS LIGHT 
UNITS RAD 
UNITS VISC 
(P) UNITS 
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User-Defined Keys 


Variables, programs, commands, or strings may be assigned to any key 
on the HP 48. When 1-User or User mode is active, these objects are 
evaluated in place of the standard key definitions. 


The ASN and STOKEYS commands may be used to assign an object to 
a key. The command RCLKEYS recalls the current key assignments, 
and DELKEYS deletes one or more assignments. These commands are 
shown on the next page. 


Setting User Mode 
1-User mode may be set by pressing (4)(USRJ. 1-User mode remains in 
effect for only one operation. User mode may be locked by pressing 


(4) twice or by setting flag -62. When flag —61 is set (4)(USR) 


toggles user mode, and 1-User mode is not available. 


Key Locations 
The notation rc.p specifies the location of a key where r is the row, c is 
the column, and p is the plane. 


| Pp | Primary Planes ft Alpha Planes 


Oor1 | Unshifted 4 Alpha 
2 Left-shifted 5 Alpha left-shifted 
3 Right-shifted 6 Alpha right-shifted 


Examples: the key is 51 (or 51.1), the left-shifted (6) key is 
74.2, and the alpha right-shifted is 23.6. 






Standard Keys 

When User mode is set, the standard key definitions apply to all keys 
which have not been reassigned. The standard key definitions may be 
disabled by supplying the S parameter to the DELKEYS command. 
The symbol S refers to standard key definitions. An individual 
standard key definition may be reactivated by supplying SKEY as the 
assigned object for ASN. All standard keys may be reactivated by 
supplying SKEY to STOKEYS. 


User-Defined Keys 233 


Flags 


User flags are numbered 1 through 64. System flags are numbered 
from —1 through -64. By convention, application developers are 
encouraged to restrict their use of user flags to the range 31-64. 


All flags are clear by default, except for the wordsize (flags —5 to —10). 


The related commands SF, CF, FS?, FC?, FS?C, and FC?C are found in 
the TEST menu. RCLF and STOF return or store a list of two 
binary integers representing the system and user flag sets (remember to 
use a wordsize of 64). 


[Flag] Description | Clear__| _Set____ | Default] 


Symbolic Math 

-1 | Principal Solution General solutions Principal solutions Clear 
-—2 | Symbolic Constants Symbolic form Numeric form Clear 
-3 | Numeric Results Symbolic results Numeric results Clear 


Not used 


Binary Integer Math 





























—-15 | Rectangular Clear 
and | Cylindrical Polar Clear 


Trigonometric Mode 


-17 | Degrees Clear Clear 
and | Radians 
—-18 | Grads 
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[Flag] Description | Clear] Set] Default] 


Math Exception 
Vector/complex Vector Complex 
Underflow Exception Return 0, Error 
set —23 or —-24 
Overflow Exception Return +MAXR, Error 


set —25 
Infinite Result Error Return {MAXR, 


set —26 
Neg. Underflow Ind. No Exception Exception 
Pos. Underflow Ind. No Exception Exception 
Overflow Indicator No Exception Exception 
Infinite Result Ind. No Exception Exception 
Symbolic ‘X+Y*V'(X,Y) | SX+Y*? 3 X+-Y4’ 
Decompilation 


Plotting and Graphics 


—28 | Plotting Multiple Plotted serially Plotted simultaneously} Clear 
Functions 
-29 | Trace mode Trace off Trace on Off 


Not used 


-31 | Curve Filling Filling Enabled Filling Disabled Enabled 
—32 | Graphics Cursor Visible light bkgnd | Visible dark bkgnd Light 
I/O and Printing 

I/O Device 

Printing Device 

I/O Data Format 

RECV Overwrite New variable Overwrite 

Double-spaced Print Single Double 

Linefeed Inserts LF Suppresses LF 

Kermit Messages Msg displayed Msg suppressed 
Time Management 

Clock Display No clock display All times 

Clock Format 12 hour 24 hour 

Date Format MM/DD/YY DD.MM.YY 

Rpt. Alarm Resched. Rescheduled Not rescheduled 

Acknowledged Alarms Deleted Saved Deleted 


Notes: If flag —43 is set, unacknowledged repeat alarms are not rescheduled. 
If flag —44 is set, acknowledged alarms are saved in the alarm catalog. 
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[Flag] Description | Clear | Set] Default] 


Display Format 


45-5] Set the number of digits in Fix, Scientific, and 
—48 | Engineering modes 


Number Display Format | ____-49 | 60 | _siD_| 


-49 | STD 
and | FIX 
—50 | SCI 
ENG 
—51 | Fraction Mark Decimal Comma Decimal 
—52 | Single Line Display Multi-line Single-line Multi 
—53 | Precedence () suppressed () displayed Clear 
[Miscellaneous 


Miscellaneous 
-54 | Tiny Array Elements Replaces “tiny” No replacement Replaces 
pivots with 0 



































Not saved Saved 






-55 | Last Arguments 

























Off 

-57 | Alarm Beep Off 

—58 | Verbose Messages Off 

59 | Fast Catalog Display On 
—60 | Alpha Key Action Twice to lock Once to lock 
USR Key Action Twice to lock Once to lock 


—62 | User Mode Not Active 
—63 | Vectored Enter Off 


Set by GETI or PUTI when their element indices wrap around 
Equation Library 


Units Type SI units English units SI 
Units Usage Units used Units not used Used 
Multiple Equation Solver 


Variable State Change | (Pp) recalls variable | (p) toggles variable 
state 
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Built-In Units 


The prefixes y, Y, z, and Z are new to the HP 48G/GX. 


UNIT PREFIXES 


HP 48 Symbol _| Prefix [ Number | Name 


Y 


<A 





Z 
E 
P 
T 
G 
M 
k, 
h, 
D 
d 
Cc 
m 
LL 
n 
p 
f 
a 
Z 
y 


quintillion 
quadrillion 
trillion 
billion 
million 
thousand 
hundred 

ten 

tenth 
hundredth 
thousandth 
millionth 
billionth 
trillionth 
quadrillionth 
quintillionth 


Prefix—unit combinations that match built-in units are: au, cd, ct, 
cu, ft, flam, kph, mph, min, nmi, Pa, ph, pt, yd, and yr. 
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arcmin 
arcs 
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Ampere 
Angstrom 


Acre 
Minute of arc 


Second of arc 


Atmosphere 
Astronomical unit 
Barn 


Bar 

Barrel 

Becquerel 

Int’! Table Btu 
Bushel 

Speed of light 
Coulomb 

Degree Celsius 
Calorie 

Candela 

Chain 

Curie 

Centimeter 
Square centimeter 
Cubic centimeter 
Centimeter per second 
Carat 

USS. cup 

Day 

Dyne 

Erg 

Electron volt 
Farad 

Degree Fahrenheit 
Fathom 

Board foot 
Footcandle 
Faraday 

Fermi 


Footlambert 


electric current 
length 

area 

planar angle 
planar angle 
pressure 
length 

area 

pressure 
volume 
activity 
energy 
volume 

speed 

electric charge 
temperature 
energy 


luminous intensity 


length 
activity 
length 

area 
volume 
speed 

mass 
volume 
time 

force 
energy 
energy 
capacitance 
temperature 
length 
volume 
illuminance 
electric charge 
length 
luminance 


4046.87260987 m2 
4.62962962963x10-> 


.71604938272x10~7 
101325 kg/mes” 
1.495979x10!! m 
1x10~28 m2 

100000 kg/mes? 
.158987294928 m3 
1/s 

105505585262 kgem?/s” 
.03523907 m3 
299792458 m/s 

1 Ass 


4.1868 kgem2/s? 
lcd 
20.1168402337 m 
3.7x10!° 1/s 

.01 m 

.0001 m2 

.000001 m? 

.01 m/s 

.0002 kg 
.0002365882365 m3 
86400 s 

.00001 kgem/s? 
.0000001 kg*m?/s? 


1.60219x10~!°kgem?/s? 
1 A2es4/k gem? 


1.82880365761 m 
002359737216 m? 
10.7639104167 cdesr/m? 
96487 Ass 

1x10") m 
3.42625909964 cd/m? 
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Int’] foot 
Square foot 
Cubic foot 

U.S. survey foot 
Feet/second 
Foot—pound-force 
Gram 

Standard freefall 
USS. gallon 
Canadian gallon 
U.K. gallon 
Gram-force 
Grade 

Grain 

Gray 

Hour 

Henry 

Hectare 
Horsepower 
Hertz 


Inch 


Square inch 

Cubic inch 

Inch of mercury 
Inch of water 
Joule 

Kelvin 

Kilocalorie 
Kilogram 
Kilopound-force 
Kilometer 

Square kilometer 
Nautical mile per hour 
Kilometer per hour 
Liter 

Lambert 
Avoirdupois pound 
Pound-force 

Troy pound 
Lumen 

Lux 

Light year 
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energy 
mass 
acceleration 
volume 
volume 
volume 
force 

planar angle 
mass 
absorbed dose 
time 
inductance 
area 

power 
frequency 
length 

area 
volume 
pressure 
pressure 
energy 
temperature 
energy 
mass 

force 

length 

area 

speed 

speed 
volume 
luminance 
mass 

force 

mass 
luminous flux 
illuminance 
length 


3048 m 
.09290304 m? 
.028316846592 m3 
.304800609601 m 
3048 m/s 
1.35581794833 kgem?/s* 
.001 kg 

9.80665 m/s? 
.003785411784 m? 
.00454609 m3 
.004546092 m3 
.00980665 kgem/s? 
.0025 

.00006479891 kg 

1 m?/s? 

3600 s 

1 kgem?/A2«s2 

10000 m? 
745.699871582 kgem?/s? 
I/s 

.0254 m 

.00064516 m2 
.000016387064 m? 
3386.38815789 kg/mes? 
248.84 kg/mes? 

1 kgem?/s? 

1K 

4186 kgem?/s? 

lkg 

4448.22161526 kgem/s” 
1km 

1 km? 

514444444444 m/s 
277777777778 m/s 
.001 m? 
3183.09886184 cd/m? 
45359237 kg 
4,44822161526 kgem/s” 
3732417216 kg 

1 cdesr 

1 cdesr/m? 
9.46052840488x10!5 m 
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Square meter 
Cubic meter 
Micron 

Mega electron volt 
Mho 

Int’! mile 

Int’] square mile 
Mil 

Minute 

USS. statute mile 
USS. statute sq. mile 
Millimeter 


Millimeter of mercury 


Milliliter 

Mole 
Megaparsec 
Mile per hour 
Meter per second 
Newton 

Nautical mile 
Ounce 

U.S. fluid ounce 


Troy ounce 
U.K. fluid ounce 


Poise 

Pascal 

Parsec 

Poundal 

Phot 

Peck 

Pound per sq. inch 
Pint 

Quart 

Radian 
Roentgen 
Degree Rankine 
Rad 

Rod 

Rem 


energy 


electric conductance 
length 

area 

length 

time 

length 

area 

length 

pressure 

volume 
amountofsubstance 
length 

speed 

speed 

force 

length 

mass 

volume 


mass 
volume 

dynamic viscosity 
pressure 

length 

force 

illuminance 
volume 

pressure 

volume 

volume 

planar angle 
radiation exposure 
temperature 
absorbed dose 
length 

dose equivalent 


.000001 m 


1.60219x10~!3 kgem?/s? 


1 A2+s3/kgem2 
1609.344 m 
2589988.11034 m2 
.0000254 m 

60s 
1609.34721869 m 
258998.47032 m2 
.001 m 


133.322368421 kg/mes? 


.000001 m3 
1 mol 


3.08567818585x1072 m 


.44704 m/s 

1 m/s 

1 kgem/s? 

1852 m 
028349523125 kg 


2.95735295625x10>m?3 


.0311034768 kg 
2.8413075x10->m? 
.1 kg/mes 
1 kg/mes? 


3.08567818585x10!6 m 
138254954376 kgem/s? 


10000 cdesr/m? 
.0088097675 m? 


6894.75729317 kg/mes” 


.000473176473 m? 
.000946352946 m? 
.1591549343092 
.000258 Ass/kg 


.01 m?/s? 
5.02921005842 m 
.01 m/s? 
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Siemens 

Stilb 

Slug 

Steradian 

Stere 

Stoke 

Sievert 

Metric ton 
Tesla 
Tablespoon 
EEC therm 
Short ton 

Long (U.K.) ton 
Torr 

Teaspoon 
Unified atomic mass 


Volt 

Watt 
Weber 

Int’1 yard 
Square yard 
Cubic yard 
Year 
Degree 


Ohm 


Built-In Units 


electric conductance 
luminance 

mass 

solid angle 
volume 

kinematic viscosity 
dose equivalent 
mass 

magnetic flux 
volume 

energy 

mass 

mass 

pressure 

volume 

mass 

electrical potential 
power 

magnetic flux 
length 

area 

volume 

time 

planar angle 
electric resistance 


10000 cd/m? 
14.5939029372 kg 
0795774715459 


1.47867647813x10->m? 


1055060000 kgem?/s? 
907.18474 kg 
1016.0469088 kg 


133.322368421 kg/mes” 
4.92892159375x10 m3 


1.6605402x10~2’ kg 
1 kgem?/Ass? 

1 kgem?/s? 

1 kgem?/Aes? 

9144 m 

.83612736 m* 
764554857984 m?> 
31556925.9747 s 


2.7171T1T1T18x10-> 
1 kgem?/A?+s3 
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Equation Library Reference 


Equation Reference 

The command SOLVEQN may be used to place a set of equations from 
the Equation Library into the built-in Solver for single equations or the 
Multiple Equation Solver for multiple equation sets. The level 3 and 2 
parameters specify the subject and title number. If the level | 
parameter is non-zero, the picture associated with the equation set will 
be placed in PICT. 


SOLVEQN Command 


Places Equation Library equation(s) in solver 
subject_number title_number P/JCT_option — 





The following table shows the subject and title numbers that may be 
used with the SOLVEQN command. If the TYPE is listed as S, the title 
contains a single equation; M indicates a set of multiple equations. A Y 
listed under PICTURE indicates that a picture is associated with the 
title. 


COLUMNS AND BEAMS 
TITLE# YPE | PICTURE 


Elastic Buckling 
Eccentric Columns 
Simple Deflection 
Simple Slope 

Simple Moment 
Simple Shear 
Cantilever Deflection 
Cantilever Slope 
Cantilever Moment 
Cantilever Shear 


Ss 
rannnaanaele 


| PICTURE | 
Y 
Y 
Y 
Y 
Y 
Y 
Y 
Y 
Y 
Y 
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ELECTRICITY 
TYPE | PICTURE 


Coulomb's Law 
Ohm's Law and Power 
Voltage Divider 
Current Divider 

Wire Resistance 
Series and Parallel R 
Series and Parallel C 
Series and Parallel L 
Capacitive Energy 
Inductive Energy 

RLC Current Delay 
DC Capacitor Current 
Capacitor Charge 

DC Inductor Voltage 
RC Transient 

RL Transient 
Resonant Frequency 
Plate Capacitor 
Cylindrical Capacitor 
Solenoid Inductance 
Toroid Inductance 
Sinusoidal Voltage 
Sinusoidal Current 


































SZnnnnZununZntZunZZZunuunnzZzn 









FLUIDS 





Pressure at Depth 
Bernoulli Equation 


Flow with Losses 
Flow in Full Pipes 
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[SCFORCESANDENERGY ENERGY 


Linear Mechanics 
Angular Mechanics 
Centripetal Force 
Hooke's Law 

1D Elastic Collisions 
Drag Force 

Law of Gravitation 
Mass-Energy Relation 


po CCCGASES 
Ideal Gas Law 

Ideal Gas State Chg 
Isothermal Expansion 
Polytropic Processes 


Isentropic Flow 

Real Gas Law 

Real Gas State Change 
Kinetic Theory 


HEAT TRANSF 


Kueze5EuE 
iz 


m 


R 

Heat Capacity 

Thermal Expansion 

Conduction 

Convection 

Conduction+Convection 

Black Body Radiation 
MAGNETISM 


=SS8258 
feces 


Straight Wire 

Force Between Wires 
B Field in Solenoid 
B Field in Toroid 


nAnnn 
KKK KX 


1 
2 
3 
4 
5 
6 
7 
8 
| 5 
1 
2 
3 
4 
5 
6 
7 
8 
|= 6. 
1 
2 
3 
4 
5 
6 
1 
2 
3 
4 
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MOTION 


E | PICTURE 


= 
TITLE 


TITLE 


Linear Motion 
Object in Free Fall 
Projectile Motion 


Angular Motion 
Circular Motion 
Terminal Velocity 
Escape Velocity 


OPTICS 


Law of Refraction 
Critical Angle 
Brewster's Law 
Spherical Reflection 
Spherical Refraction 
Thin Lens 


vozezel 


| <i 





Susann 





OSCILLATION 
Mass-Spring System 
Simple Pendulum 


n 


Conical Pendulum 
Torsional Pendulum 


MK] [KKK KK 


--4-4< 









Simple Harmonic 


PLANE GEOMETRY 
M 


Circle 
Ellipse 
Rectangle 
Regular Polygon 
Circular Ring 
Triangle 












KK nd ee 


1-4 
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| 12 CO SOLID GEOMETRY 

| TITLE# | TITLE | CTYPE 
Cone 
Cylinder 
Parallelepiped 
Sphere 


PICTURE 


cena 
ef 


SOLID STATE DEVICES 


PN Step Junctions 
NMOS Transistors 
Bipolar Transistors 


i - 
= 


JFETs 
STRESS ANALYSIS 

Normal Stress 

Shear Stress 


Stress on an Element 
Mohr's Circle 


KKK 


WAVES 


Transverse Waves 
Longitudinal Waves 
Sound Waves 
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Constants Reference 


| Name | Description 


Avogadro's number 
Boltzmann constant 

Molar volume 

Universal gas constant 
Standard temperature 
Standard pressure 
Stefan-Boltzmann constant 
Speed of light in vacuum 
Permittivity of vacuum 
Permeability of vacuum 
Acceleration due to gravity 
Gravitational constant 
Planck's constant 

Dirac's constant 

Electronic charge 

Electron rest mass 

q/me ratio (electron charge-to-mass) 
Proton rest mass 

mp/me ratio (proton, electron mass) 
Fine structure constant 
Magnetic flux quantum 
Faraday constant 

Rydberg constant 

Bohr radius 

Bohr magneton 
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| Name, | ————_Desoriplon | 


Nuclear magneton 

Photon wavelength 

Photon frequency 

Compton wavelength 

1 radian 

2 radians 

180° angle (in current trig mode if no units) 
Wien's displacement law constant 
k/q (Boltzmann, electronic charge) 
€0/q (permittivity, electronic charge) 
qee0 (electronic charge, permittivity) 
Dielectric constant of silicon 
Dielectric constant of silicon dioxide 
Reference intensity 
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Command Index 


This index lists the commands and functions in the HP 48, grouped into 


subject areas. Some commands or functions appear more than once. 


BINARY INTEGER MATH 
Logical bit-by-bit AND 
Arithmetic shift right 
Binary-to-real conversion 
One's complement 
Logical bit-by-bit OR 
Recalls the binary integer wordsize 
Rotates left by one bit 
Rotates left by one byte 
Rotates right by one bit 
Rotates right by one byte 
Real-to-binary conversion 
Shifts left by one bit 
Shifts left by one byte 
Shifts right by one bit 
Shifts right by one byte 
Sets the binary integer wordsize 
Logical bit-by-bit XOR 


SQRT(x?+y7) 

Returns the polar angle @ of a coordinate pair (x,y) 
Complex conjugate 

Complex-to-real conversion 

Symbolic constant i 

Returns imaginary part of a number or array 
Negates an argument 

Complex decomposition 

Returns the real part of a complex number 
Real-to-complex conversion 

Returns unit vector in the direction of the argument 
Separates (x,y) into x and y or r and 8 


Combines x and y into (x,y) or (1,8) if flag -19 is set 


Command Index 
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ARRAY AND LIST OPERATIONS 


ADD Same as +, but performs element-wise addition of objects in lists 







































ARRY> Separate array into individual elements 

—ARRY Combines numbers into an array 

CONVERT Performs a unit conversion 

DOLIST Applies n arguments in list to an object 

DOSUBS Executes a program or command using arguments in a list 
DTAG Removes all tags from object 

ENDSUB Returns the maximum frame number for DOSUBS 

EQ> Separates equation into left and right sides 

GET Gets an element from a list or array 


Gets an element from a list or array, increments and returns the 
index, and returns the list or array 
Returns the first object in a list 


GETI 


































HEAD 









LIST Separates a list into individual objects 

LIST Combines objects into a list 

ALIST Computes first differences of elements in a list 

XLIST Sums the elements in a list 

TILIST Returns the product of elements in a list 

NSUB Returns the current frame number for DOSUBS 

OBJ Decomposes a composite object into individual components. 
POS Finds an object in a list 

PUT Replaces an element in a list or array 


PUTI Replaces an element in an array or list, increments and returns 
the index, and returns the list or array 


Writes an object into another object 
































REPL 












REVLIST Reverses the the order of elements in a list 

SEQ Generates a list of results from repeated execution of an object 
SIZE Finds the number of elements in a list 

SORT Sorts elements in lists 

STREAM Cumulatively applies object to arguments in a list 

SUB Extracts a portion of a list 

~TAG Builds a tagged object 

TAIL Returns a list less its first object 

V2 Combines two real numbers into a vector 

V3 Combines three real numbers into a vector 





Va Separates a 2- or 3-element vector 





CONSTANTS 
Displays the Constants Library catalog 
Returns a constant from the Constants Library 
Symbolic constant i 


Symbolic constant e 
Symbolic constant — maximum HP 48 real number 
Symbolic constant — minimum HP 48 real number 


Symbolic constant 1 
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CUSTOMIZATION 

ASN Make a single user-key assignment 

DELKEYS Clears user-key assignments 

DEFINE Creates variable or user-defined function 
MENU Selects a built-in menu or creates a custom menu 
ORDER Rearranges the VAR menu 

RCLF Returns a list containing the system and user flags 
RCLKEYS Lists user-key assignments 

RCLMENU Recalls number and page of active menu 

STOF Sets system and user flags 

STOKEYS Makes multiple user-key assignments 

TMENU Displays temporary built-in or list-defined menu 


DATA ENTRY AND EDITING 


Displays a choose box with specified elements 
Freezes up to three display areas 

Displays input form with specified fields 
Suspends program and waits for data 

Returns key in buffer 

Returns LAST arguments (if saved) 

Returns LAST arguments (if saved) 

Displays message, waits for acknowledgment 
No-Value placeholder for input form field data 
Displays prompt and halts program 

Selects the stack display 

Pauses program execution or waits for a key 


DEBUGGING AND ERROR HANDLING 


DOERR Generates system or user-defined error 
ERRO Clears the last error number 

































ERRM Returns the last error message 
ERRN Returns the last error number 
HALT Suspends program execution 
IFERR Begins IFERR test 

KILL Cancels all suspended programs 
LAST Returns arguments (if saved) 


LASTARG Returns arguments (if saved) 
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DIFFERENTIAL EQUATIONS 


RKF Computes solution of initial value problem using RKF method 
RKFERR Computes the change in solution and absolute error estimate 
using the RKF method 

Computes the next solution step of the initial value problem 
within a specified error tolerance using the RKF method 
Computes solution of initial value problem using RRK method 
Computes the next solution step of the initial value problem 
within a specified error tolerance using the RRD method 
Computes the change in solution and absolute error estimate 
using the Rosenbrock and RKF methods 


DISPLAY MANAGEMENT 


Clears the stack display 

Displays an object on line n 

Freezes up to three display areas 
Enters the graphics environment 
Displays PICT at specified coordinate 
Selects the stack display 


EQUATION LIBRARY 


EQNLIB Displays the Equation Library catalog 
SOLVEQN Places an equation set into the Solver 


AMORT Computes amortization 

TVM Displays TVM solver menu 

TVMBEG Sets payment mode to beginning of period 
TVMEND Sets payment mode to end of period 
TVMROOT Solves for TVM variable 


GENERAL MATH 


Absolute value 

Returns the polar angle 6 of a coordinate pair (x,y) 
Next greater integer 

Complex conjugate 

Factorial or gamma function 
Computes discrete Fourier transform 
Next smaller integer 

Fractional part 

Adds in H.MS format 

Subtracts in H.MS format 

Converts a number from H.MS format 
Converts a number to H.MS format 



























RKFSTEP 












RRK 
RRKSTEP 






RSBERR 
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GENERAL MATH (cont. 


Computes inverse discrete Fourier transform 

Inverse (reciprocal) 

Integer part 

Mantissa of a number 

Maximum of two numbers 

Minimum of two numbers 

Modulo 

Negates an argument 

Computes coefficients of a polynomial with specified roots 
Evaluates a polynomial with specified coefficients at x 
Computes roots of polynomial with specified real or complex 
coefficients 

Converts number to fractional equivalent 

—Q after factoring out 7 

Real part of a complex number 

Rounds fractional part of number 

Finds a numerical root 

Computes a correction to the solution of a system of equations 
Radians-to-degrees conversion 

Sign of a number 

Squares a number 

Computes a Taylor series approximation 

Truncates number 

Exponent of a number 

x" root of y 

Square root 


Integral 

Derivative 

Adds two objects 

Subtracts two objects 
Multiplies two objects 
Divides two objects 

Raises a number to a power 
Percent 

Percent change 

Percent total 


GRAPHICS AND PLOTTING 


ANIMATE 
ARC 
ATICK 
AUTO 
AXES 
BAR 
BARPLOT 


Command Index 


Animates a series of grobs in PICT 

Draws an arc in PICT 

Specifies axes tick mark spacing 

Scales y-axis 

Sets intersection of axes and optionally stores labels 
Selects bar plot 

Draws a bar plot of the data in DAT 
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GRAPHICS AND PLOTTING (cont. 


BLANK 
BOX 
CENTR 
CLLCD 
CONIC 
CPX 
DEPND 
DIFFEQ 
DRAW 
DRAX 
ERASE 
EYEPT 
FUNCTION 
GOR 
GRAPH 
GRIDMAP 
—GROB 
GXOR 

*H 
HISTOGRAM 
HISTPLOT 
INDEP 
LABEL 
LCD > 
—LCD 
LINE 

NEG 
NUMX 
NUMY 
PARAMETRIC 
PARSURFACE 
PCONTOUR 
PDIM 

PICT 
PICTURE 
PIXOFF 
PIXON 
PIX? 
PMAX 
PMIN 
POLAR 
PRLCD 
PVIEW 
PWRFIT 
PX>C 
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Creates a blank graphics object 

Draws a box in PICT 

Sets center of plot display 

Clears the stack display 

Selects conic plot 

User-unit to pixel coordinate conversion 
Specifies plot dependent column, variable, or range 
Selects differential equation plot 

Draws a plot 

Draws axes 

Erases PICT 

Specifies location of eyepoint relative to view volume 
Selects function plot 

Superimposes graphics objects 

Enters the graphics environment 

Selects gridmap plot 

Converts object into graphics object 
Superimposes and inverts graphics objects 
Adjusts the height of a plot 

Selects histogram plot 

Draws a histogram of the data in SDAT 
Selects plot independent column, variable or range 
Labels axes 

Returns LCD as 131x64 pixel graphics object 
Displays graphics object 

Draws a line between two coordinates 
Inverts a graphics object 

Specifies number of 3D plot steps in x 
Specifies number of 3D plot steps in y 
Selects parametric plot 

Selects parsurface plot 

Selects pseudo-contour plot 

Changes the size of PICT 

Returns the name PJCT 

Enters the graphics environment 

Turns off a pixel in PICT 

Turns on a pixel in PICT 

Tests a pixel in PICT 

Specifies the upper-right plot coordinates 
Specifies the lower-left plot coordinates 
Selects polar plot 

Prints an image of the display 

Displays PICT at specified coordinate 
Selects power curve-fitting model 

Pixel to user-unit coordinate conversion 
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GRAPHICS AND PLOTTING (cont. 


RCEQ 

REPL 

RES 

SCALE 
SCATRPLOT 
SCATTER 
SIZE 
SLOPEFIELD 
STEQ 

SUB 

TEXT 

TLINE 
TRUTH 

*W 
WIREFRAME 
XCOL 

XVOL 
XXRNG 
YCOL 

YRNG 
YSLICE 
YVOL 
YYRNG 


Recalls the current equation 

Writes one graphics object into another graphics object 
Sets the plot resolution in user unit or pixel intervals 
Specifies x and y scale in units per 10 pixels 

Draws a scatter plot of the data in XDAT 

Selects scatter plot 

Finds the dimensions of a graphics object 

Selects slopefield plot 

Stores into reserved variable EQ 

Extracts a sub-grob 

Displays the stack display 

Toggles pixels on a straight line 

Selects truth plot 

Adjusts the width of a plot 

Selects wireframe plot 

Specifies XDAT column as independent variable 
Specifies view volume width 

Specifies width of 3D target mapping range 
Specifies a YDAT column as the dependent variable 
Specifies y-axis plotting range 

Selects yslice plot 

Specifies view volume depth 

Specifies heig 


HYPERBOLIC OPERATIONS 


Inverse hyperbolic cosine 

Inverse hyperbolic sine 

Inverse hyperbolic tangent 
Hyperbolic cosine 

Natural exponential minus 1 
Natural logarithm of (argument + 1) 
Hyperbolic sine 

Hyperbolic tangent 


INPUT/OUTPUT AND DATA TRANSFER 


Command Index 


Sets the baud rate 

Sounds a beep 

Returns number of characters in the serial buffer 
Displays a choose box with specified elements 
Select the checksum scheme 

Closes the serial port 

Terminates Kermit server mode 

Displays an input form with specified fields 
Suspends program and waits for data 
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INPUT/OUTPUT AND DATA TRANSFER (cont. 


Returns the last Kermit error message 

Returns key in buffer 

Gets named data from a remote device 
Displays message, waits for acknowledgment 
Opens IR or wired port 

Sets parity 

Sends commands to server 

Receives and renames file from remote Kermit 
Receives file from remote Kermit, saves in a sender-named 
object 

Sends serial break 

Sends object to another Kermit device 

Selects Kermit Server mode 

Reads characters from I/O port without Kermit 
Sets serial transmit/receive timeout 

Selects character translation mode 

Sends string through I/O port without Kermit 
Recieves an object using Xmodem protocol 
Sends an object using Xmodem protocol 


Antilogarithm 

Symbolic constant e 

Natural exponential 

Natural exponential minus 1 
Natural logarithm 

Natural logarithm of (argument + 1) 
Common (base 10) logarithm 
Returns the exponent of a number 


Logical or binary AND 
Logical or binary NOT 
Logical or binary OR 

Tests two objects for equality 
Logical or binary XOR 


Less-than comparison 
Less-than-or-equal comparison 
Greater-than comparison 
Greater-than-or-equal comparison 


Not-equal comparison 
Tests two objects for equality 
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MATRIX AND ARRAY OPERATIONS 


Command Index 


Square root of sum of squares of elements 

Separate array into individual elements 

Combines numbers into an array 

Separates complex array into two arrays 

Column norm 

Adds a column vector to a matrix 

Deletes a column from a matrix 

Separates a matrix into column vectors 

Combines column vectors into a matrix 

Creates a constant array 

Estimates the column norm condition number of a matrix 
Complex conjugate 

Cross product 

Swaps two columns in a matrix 

Determinant of a matrix 

Returns a vector of major diagonal elements 

Creates a matrix with specified diagonal elements 

Dot product of two vectors 

Computes eigenvalues and right eigenvectors of a square matrix 
Computes eigenvalues of a square matrix 

Gets an element from a list or array 

Gets an element from a matrix, increments and returns the index, 
and returns the matrix 

Creates an identity matrix 

Returns array of imaginary parts from complex array 

Returns the LQ factorization of a matrix 

Returns the minimum norm least-squares solution to a system of 
linear equations 

Returns the Crout LU decomposition of a square matrix 
Negates elements in an array 

Replaces an element in an list or array 

Replaces an element in an list or array, increments and returns 
the index, and returns the list or array 

Computes the QR factorization of a matrix 

Combines two arrays into complex array 

Estimates the rank of a rectangular matrix 

Creates an array of random integers 

Multiplies a row in a matrix by a factor 

Multiplies a row in a matrix by a factor and adds the result to 
elements in another row 

Redimensions an array 

Returns array of real parts from complex array 

Computes row norm of an array 

Adds a row to a matrix 

Deletes a row from a matrix 

Separates a matrix into row vectors 

Combines row vectors into a matrix 
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MATRIX AND ARRAY OPERATIONS (cont. 


Computes the reduced row-echelon form of a matrix 
Swaps two rows in a matrix 

Computes the Schur decomposition of a square matrix 
Finds the number of elements in an array or matrix 
Computes the spectral norm of an array 

Squares a matrix 

Computes the spectral radius of a square matrix 
Computes the singular value decomposition of a matrix 
Computes the singular values of a matrix 

Computes the trace of a square matrix 

Transposes a matrix 

Combines two real numbers into a vector 

Combines three real numbers into a vector 

Separates a 2 or 3 element vector 


ARCHIVE Makes backup copy of HOME directory 
ATTACH Attaches library to current directory 

BYTES Returns the checksum and number of bytes of an object 
CLTEACH Purges the examples directory 

CLUSR Purges all user variables in the current directory 
CLVAR Purges all user variables in the current directory 
CRDIR Creates a directory 

DEFINE Creates user-defined function 

DETACH Detaches library from current directory 

FREE Frees merged memory 

FREE1 Frees merged memory in port 1 

HOME Selects the HOME directory 

LIBS Lists libraries attached to current directory 
MEM Returns available memory 

MERGE Merges RAM card with main memory 
MERGE1 Merges RAM card in port 1 with main memory 
NEWOB Separates object from list or backup name 
ORDER Rearranges the VAR menu 

PATH Returns a list showing the current path 

PGDIR Purges specified directory and its contents 
PINIT Initializes a RAM card in port 2 

PURGE Purges one or more variables 

PVARS Returns list of port objects 

RCEQ Recalls the current equation 

RCL Recalls the contents of a variable 

RCLF Returns a list containing the system and user flags 
RCLY Recalls the current statistics matrix 

RESTORE Replaces HOME directory with backup copy 
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MEMORY MANAGEMENT (cont. 


Tests two objects for equality 

Finds the dimensions of an object 

Stores into reserved variable EQ 

Stores an object into a variable 

Stores into reserved variable XDAT 

Creates examples directory in the VAR menu 
Lists the variables of specified type 

Returns the type of an object 

Makes parent directory the current directory 
Returns list of variables in the current directory 
Returns type of object in named variable 
Assigns local variable(s) 


MISCELLANEOUS FUNCTIONS & COMMANDS 


DARCY 

FO» 
MINEHUNT 
SIDENS 
VERSION 


Calculates Darcy friction factor 

Calculates black-body emissive power 

Starts the Minehunt game 

Calculates intrinsic density of silicon 

Displays operating system version and copyright 
Calculates gas compressibility factor Z 


MODES AND FLAGS 


Command Index 


Sets binary base 

Clears a system or user flag 

Sets polar/cylindrical angle mode 
Sets decimal base 

Sets Degrees mode 

Sets Engineering display mode 

Tests a system or user flag 

Tests and clears a system or user flag 
Sets Fix display mode 

Tests a system or user flag 

Tests and clears a system or user flag 
Sets Grads mode 

Sets hexadecimal base 

Sets octal base 

Sets Radians mode 

Returns a list containing the system and user flags 
Sets rectangular angle mode 

Sets Scientific display mode 

Sets a system or user flag 

Sets polar/spherical angle mode 

Sets Standard display mode 

Sets system and user flags 
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MULTIPLE EQUATION SOLVER 


MCALC 
MINIT 
MITM 
MROOT 


MSOLVR 


PRINTING 
CR 


Sets Multiple Equation Solver variable to not user-defined state 
Establishes Mpar from EQ 

Specifies the title and order of menu in Mpar 

Solves for single or all variables using the Multiple Equation 
Solver 

Displays the Multiple Equation Solver menu 

Sets Multiple Equation Solver variable to user-defined state 


Prints a carriage-right 

Sets 0 <=n <= 6.9 sec delay between printed lines 
Remaps to HP 82240A character set 

Prints an image of the display 

Prints the stack 

Prints the stack in compact format 

Prints the name and contents of one or more variables 
Prints an object 


Combinations of n objects taken r at a time 
Factorial or gamma function 
Factorial or gamma function 


Permutations of n objects taken r at a time 
Returns a random number 

Sets the random number seed 

Upper-tail Chi-Square distribuion 
Upper-tail F-distribution 

Upper-tail normal distribution 

Upper-tail t-distribution 


Begins CASE structure 
Continues a halted program 
Begins DO loop 

Generates user-defined or system error 
Begins ELSE clause 

Ends program structures 
Evaluates an object 

Begins FOR loop 

Suspends program execution 
Begins IF test 

Begins IFERR test 

IF ... THEN ... END test 

IF ... THEN ... ELSE ... END test 
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PROGRAM BRANCHING AND CONTROL (cont. 


INPUT Suspends program and waits for data 

KILL Cancels all suspended programs 

LIBEVAL Executes a library object 

NEXT Ends FOR ... NEXT or START... NEXT 
—NUM Evaluates an object to yield a numeric result 
OFF Turns the calculator off 

PROMPT Displays prompt and halts program 
REPEAT Part of WHILE ... REPEAT ... END 
START Begins START ... NEXT or START ... STEP 
STEP Ends FOR ... STEP or START ... STEP 
SYSEVAL Executes a system object 

THEN Begins THEN clause 

UNTIL Part of DO ... UNTIL ... END 

UPDIR Makes parent directory current directory 
WAIT Pauses program execution or waits for a key 
WHILE Begins WHILE ... REPEAT ... END 
WSLOG Returns the four most recent system halts 

=> Assigns local variable(s) 


STACK MANIPULATION 


—ARRY Combines numbers into an array 

CLEAR Clears the stack 

DEPTH Counts the objects on the stack 

DROP Drops one object from the stack 

DROPN Drops n+1 objects from the stack 

DROP2 Drops two objects from the stack 

DUP Duplicates one object on the stack 

DUPN Duplicates n objects on the stack 

DUP2 Duplicates two objects on the stack 

LAST Returns LAST arguments (if saved) 
LASTARG Returns LAST arguments (if saved) 

LIST Combines objects into a list 

OVER Copies the object in level 2 into level 1 

PICK Copies nth object into level 1 (excluding n) 
ROLL Moves level n+1 object to level 1 (excluding n) 
ROLLD Moves the level 2 object to level n (excluding n) 
ROT Moves the level 3 object to level 1 

SWAP Swaps the objects in levels 1 and 2 
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STATISTICS 
BAR Selects bar plot 
BARPLOT Draws a bar plot of the data in DAT 
BESTFIT Executes LR and computes the best curve fit 
BINS Sorts DAT data into histogram bins 
CLY Purges the statistics matrix 
CNRM Column norm of an array 
COLY Specifies dependent and independent columns in YDAT 
CORR Correlation coefficient 
COV Sample covariance 
EXPFIT Selects exponential curve-fitting model 
HISTOGRAM Selects histogram plot 
HISTPLOT Draws a histogram of the data in YDAT 
Selects linear curve-fitting model 
Selects logarithmic curve-fitting model 
Linear regression 
Finds the maximum coordinate values in YDAT 
Means of the data in XDAT 
Finds the minimum coordinate values in YDAT 
Normal probability density 
Number of data points in XDAT 
Population covariance 
Population variances of the data in YDAT 
Predicted dependent variable value 
Predicted independent variable value 
Predicted dependent variable value 
Population standard deviation of the data in YDAT 
Selects power curve-fitting model 
Recalls the current statistics matrix 
SCATRPLOT Draws a scatter plot of the data in YDAT 
SCATTER Selects scatter plot 
SDEV Sample standard deviations of the data in YDAT 
STO Stores into reserved variable DAT 
Sums the columns in DAT 
Sample variances of the data in YDAT 
Specifies a SDAT column as the independent variable 
Specifies a YDAT column as the dependent variable 
Specifies x-axis plotting range 
Summation 
Best-fit line for data in XDAT 
Sum of data in independent YDAT column 
Sum of squares in independent YDAT column 
Sum of data in dependent XDAT column 
Sum of squares of data in dependent }DAT column 
Sum of products in independent and dependent XDAT columns 
Appends one or more data points to SDAT 
Deletes last row from DAT 
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STRING MANIPULATION 


Makes a one-character string 

Returns the first character of a string 

Returns character code of a string's first character 
Finds a substring in a string 

Finds the number of characters in a string 

Parses and evaluates a string 

Converts an object to a string 

Extracts a portion of a string 

Returns a string less its first character 


Returns an evaluated expression as the 

argument to an unevaluated local name 

Collects like terms 

Separates equation into left and right sides 

Expands an algebraic 

Symbolic constant e 

Symbolic constant i 

Symbolic constant 7 

Isolates a variable in an equation 

Test if an equation is linear in a variable 
Match-and-replace, beginning with subexpressions 
Match-and-replace, beginning with the top-level expression 
Evaluates an object to yield a numeric result 

Separates outermost function and its arguments 

Solves a quadratic polynomial 

Returns argument expression unevaluated 

Resolves all references to a name implicit in an algebraic 
Computes a Taylor series approximation 

Integral 

Derivative 

"Where": appends local name and value to evaluated expression 


Arc cosine 

Arc sine 

Arc tangent 

Cosine 

Degrees-to-radians conversion 
Radians-to-degrees conversion 
Sine 

Tangent 
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TIME AND ALARMS 


ACK Acknowledges displayed past due alarm 
ACKALL Acknowledges all past due alarms 
CLKADJ Add clock ticks to the system time 
DATE Returns the system date 

—DATE Sets the system date 

DATE+ Adds a number of days to a date 
DDAYS Number of days between two dates 
DELALARM Deletes an alarm 

FINDALARM Returns alarm index n 

HMS+ Adds in H.MS format 

HMS- Subtracts in H.MS format 

HMS~ Converts a number from H.MS format 
—HMS Converts a number to H.MS format 
RCLALARM Recalls alarm from alarm list 
STOALARM Stores alarm in system alarm list 

TICKS Returns time in binary integer clock ticks 
TIME Returns current time as number 

TIME Sets specified system time 

TSTR Converts date & time numbers to string form 


UNIT OBJECT OPERATIONS 


CONVERT Performs a unit conversion 

OBJ Decomposes a unit object into a number and unit expression 
TDELTA Calculates temperature difference 

TINC Adds temperature increment 

UBASE Converts unit object to SI base units 

UFACT Factors specified compound unit 

UNIT Builds a unit object 

UVAL Returns scalar portion of unit object 


VARIABLE ARITHMETIC 


Decrements then returns value of a variable 
Increments then returns value of a variable 
Conjugates the contents of a variable 
Inverts the contents of a variable 

Negates the contents of a variable 

Storage arithmetic add 

Storage arithmetic subtract 

Storage arithmetic multiply 

Storage arithmetic divide 





264 Command Index 


Command Reference 


This command reference provides information about all commands and 
functions in the HP 48. Each entry lists the name, menu locations, 
characteristics, description, stack diagrams, and related flags if 
applicable. 


NAME MEHL Characteristics 
Description 


Input Output 
Level3 Levelz Level) —> Level3 Levelz Level, 
Related Flags: Flags which may affect the result 
Notes: Notes about the command or function 





The characteristics are encoded as follows: 


New HP 48G/GX command 
Accepts arguments in lists 
Invertible 

Differentiable 

Integrable 





For instance, ACOSH is a function which has an inverse, is 
differentiable, and can accept arguments in a list: 


ACOSH H¥F  ACOSH { } Jo Function 
Inverse hyperbolic cosine 
Z — acoshz 
‘symb’ — ‘ACOSH(symb)’ 


Related Flags: -1, -3 





Commands or functions which can take their arguments in lists 
(indicated by a { } characteristic) execute once for each argument in the 
list. For instance, the program * £ 3 5 3} SF ® sets user flags 
3and5. The program*# £126 3% 3 7 8 } * ® returns the 
list { 3 14 48 }. 
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The following table lists the terms used in the stack diagrams. Note 
that system modes may affect the interpretation of input parameters or 
the results of some functions. 


obj Any object 

xory Real number 

abcd Real number 

(x,y) Complex number or user-unit graphics coordinates 

Zz Real or complex number 

morn Positive integer real number (rounded if non-integer) 

#n or #m Binary integer 

X_unit Real number with units 

“string” Character string 

{ list } List of objects 

grob Graphics object 

{ #x #y } Pixel coordinates 

hms Real number in HH.MMSS format 

time Time in HH.MMSS format 

date Date in current MM.DDYYYY or DD.MMYYYY format 
(flag —42) 

T/F Test result: 0 (false) or non-zero (true) 

“symb’ Expression or name treated as an algebraic 

[vector] Real or complex vector 

[[matrix]] ] Real or complex matrix 

[R-array] Real vector or matrix 

[C-array] | Complex vector or matrix 

{row col} | Coordinates of an element in a matrix 

position Real number specifying an element in a list, vector, or matrix. 
May be a list containing two real numbers specifying an 
element in a matrix. 

‘name’ Global or local name 

‘global’ Global name 

rc or rc.p Key location: row-col or row-col.plane (see User Keys) 

mm.pp Menu specified as menu.page 

d.o.f. Degrees of freedom (positive integer) 

port Port number: 0 — 33 or & (wildcard) 

backup Backup object 

library Library object 

LID Library identifier (port:library number) 
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ABS VECTE ABS { } 0 Function 
MATR HORM ABS 
REAL ABS 
EMPL ABS 
Absolute value. For arrays, returns the norm, defined as the square 
root of the sum of squares of the absolute values of the elements. 
x > Ixl 
eed 


(x,y) x2 ty? 


[vector] —  Ilvectorll 
{{matrix]] —  IImatrixll 
‘symb’ — ‘ABS(symb)’ 
xX_unit — Ixl_unit 
Related Flag: -3 
ACK (4) ALREM ACE Command 
Acknowledges displayed past due alarm 
Related Flags: —43, -44 
ACKALL (4) (TIME) ALF MN ACKA 
Acknowledges all past due alarms 
Related Flags: —43, -44 
ACOS_ (4) { } 
Arc cosine 
Z — acosz 
‘symb’ — ‘ACOS(symb)’ 
Related Flags: —1, -3, -17, -18 
ACOSH HF ACOSH { } Vo Function 
Inverse hyperbolic cosine 
Zz — acoshz 
‘symb’ — ‘ACOSH(symb)’ 
Related Flags: -1, -3 
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ADD LIST AGE G J o Function 
Adds two objects 


Z, Z2 
#n m 
n #m 
#n #m 
x_unit y_unit 
‘symb,’ ‘symb ’ 
z “symb’ 
‘symb’ z 
“symb’ x_unit 
xX_unit ‘symb’ 
[vector,] [vector] 
({{matrix,]] [[matrix] 
grob, grob 
“abc” “def” 
“string” object “stringobject” 
object “string” “objectstring” 
{ obj; obj2 } { objz obj4} — { objj+obj3 objr+objq } 
{ objy obj2... } Objnew — { Objjt+Objnew Obj2+ODjnew -.- } 
ODjnew { obj; obj2 Oe ec Objnew+obj, Objnewt+obj2 wey 

Related Flags: -3, -5 through —-10 

Notes: 

1) ADD is the same as +, except that element-wise addition is 
performed on lists instead of concatenating lists. The lists must 
contain the same number of objects. 

1) Grobs must have the same dimensions 

2) STR is executed on objects added to strings 

3) Units must be dimensionally consistent 


Z\+Z2 

#n+m 

#n+m 

#n+m 

x+y_unit 
‘symb,+symb)’ 
‘z+symb’ 
“symb+z’ 
‘symb+x_unit’ 
*x_unit+symb’ 
[vector,+vector] 
[[matrix ;+matrix] 
grob3 

“abcdef”’ 


bbb PV bbb edd 
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ALOG (4) { } J 0) Function 
Antilogarithm 
z— 102 
‘symb’ — ‘ALOG(symb)’ 
Related Flag: -3 
AMORT (q) (SOLVE) TM AMNOR G Command 
Calculates amortization from TVM variables IZ YR, PV, PMT, FV, 
and PYR. 
payments — principal interest balance 


Related Flag: -14 
AND E 
u 


ASE LOGIC ANE { } Function 
Eee AME 
Logical or binary AND 
#nq #n2 
x y 
x ‘symb’ ‘x AND symb’ 
‘symb’ x ‘symb AND x’ 
‘symb,’ ‘symb9’ ‘symb,; AND symb’ 
“string,” “string” “string3” 
Related Flags: —3, —5 through —10 
Note: String arguments must have the same length 
ANIMATE GREOE AHIM G Command 
Animates a series of grobs. The grobs may optionally be specified as 
names. Delay is the delay in seconds between each grob displayed. 
Repeat is the number of times to repeat the sequence (1048575 cycles 
if repeat=0). 
grob, ... grob, n — grob, ... grob, n 
name, ...name, n — grobj, ... groby n 

grob, ... grob, { n { #x #y } delay repeat} — grob, ... grob, { } 
name, ...name, {n { #x #y } delay repeat} — grob, ... grob, { } 
Notes: 
1) If the list specifier is not used, the delay between each grob will 

default to .1 second. 
2) ANIMATE leaves its parameters on the stack. 
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APPLY (4) (SYMBOLIC) (NXT) AF FLY d Function 
Returns an evaluated expression as the argument to an unevaluated 
local name 

{ symb, ... symb, } ‘name’ — ‘name(symby, ..., symb,)’ 
‘“APPLY(symby, ..., symb,)’ 
ARC FICT ARC Command 
Draws an arc in PICT centered at (x,y), radius r, counterclockwise 
from 8; to 0) 






























(x,y) r 8,8 
{ #x #y } #r 0; 05 -> 
Related Flags: -17, -18 
ARCHIVE [4) ARCHI 
Makes a backup copy of HOME directory 
‘IO: name > 
‘port: name —> 
Related Flags: -33, -39 
Note: ARCHIVE does not save the settings of user flags or the 
contents of port 0. 
ARG CAMPL ARG { } Oo Function 
Returns the polar angle 0 of a coordinate pair (x,y) 
z— 0 
— ‘ARG(symb)’ 














{ } Command 








Related Flags: -17, -18 
ARRY—> 
Separates array into individual elements 
[vector] — Z]...Z, {n} 

{{matrix]] — 211 Z12 ...Zpm {nm} 
—ARRY TTPE SARE 
Combines real or complex numbers into an array 

Z1...Zy {n} — [vector] 

Z11Z12 --»Znm {nm} —  [[matrix]] 


ASIN (4) (ASIN) {J 


Arc sine 









{ } Command 













Z —> asinz 


‘symb’ — ‘ASIN(symb)’ 
Related Flags: —1, -3, -17, -18 
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ASINH HvF ASIHH { }\ 0) Function 


Inverse hyperbolic sine 


z — asinhz 
‘symb’ — ‘ASINH(symb)’ 
Related Flags: —1, -3 
ASN (4) EEYS ASH { } Command 
Make a single user-key assignment 
object rc.p —-> 
‘SKEY’ rc.p — Reactivates standard key 
Related Flags: -61, -62 
ASR BASE BIT ASE { } Command 
Arithmetic shift right (preserves most significant bit) 
#n, —> #n2 
Related Flags: —5 through —12 


ATAN (a) { } J 0) Function 
Arc tangent 
atan z 
‘ATAN(symb) 
Related Flags: —-1, -3, — 
ATANH HF ATAHH { } Vo Function 
Inverse hyperbolic tangent 
z — atanhz 
‘symb’ — ‘ATANH(symb) 
Related Flags: —1, —3, —22 
ATICK = (4) FFAR ATICEK G Command 
Specifies tick spacing on plot axes 
n — User-unit spacing for both axes 
{x y} — User-unit spacing for each axis 
#n — Pixel spacing for both axes 
{ #x#y } — Pixel spacing for each axis 


ATTACH (4) ATTAC { } Command 
Attaches library to current directory 

LID > 
Note: Many libraries may be attached to the HOME directory, but only 
one library at a time may be attached to a subdirectory. 
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AUTO 
Scales y-axis 
AXES (6) FPRAR AXES Command 
Sets intersection of axes and optionally stores labels and tick spacing 
(x,y) — Replaces entire axes parameter 
{ (x,y) } — Replaces intersection only 
{ “Xlabel” “Ylabel” } — Specifies labels only 
{ (xy) “Xlabel” “Ylabel” } —> Replaces entire axes parameter 
> 
a 


Command 







(4) (PLOT AUTO 








{ tick } Specifies tick spacing only 
{ (x,y) tick } Replaces entire axes parameter 
{ (x,y) tick “Xlabel” “Ylabel” } —> Replaces entire axes parameter 
Note: “tick” specifies the spacing of tick marks on the axes, and can 
have the following forms: 







x User-unit spacing for both axes 
#n Pixel spacing for both axes 
{x y} User-unit spacing for x- and y-axes 
{ #x #y } Pixel spacing for x- and y-axes 























BAR (4) STAT PTYPE Command 
Selects bar plot 
BARPLOT (4) PLOT BHREL Command 
Draws a bar plot of the data in YDAT 
BAUD (4) IOFAR BAUG Command 
Sets the serial baud rate: 1200, 2400, 4800, or 9600 (default) 
n- 
Note: The clock should not be displayed during 9600 baud transfers 
BEEP OUT BEEF { } Command 
Sounds a beep. Maximum 4400 Hz, 1048 seconds. 
Hz secs > 


BAR 
























Related Flag: -56 
BESTFIT [(4) SPAR MODL GEST Command 
Selects the statistics model that yields the largest absolute value for the 
correlation coefficient and executes the LR command 
BIN BASE BIH 
Sets binary base 

Related Flags: —5 through —12 
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BINS (6) IVAF BIHS Command 
Sorts the DAT data into N bins using the independent variable 
column as the sort key. The level 1 result shows the number of data 
points less than and greater than the available bins. 

Xmin Width N —  [[b,]... [bn]] [by br] 
BLANK GROB BLAH 
Creates a blank graphics object 
#width #height — grob 
BOX PICT BOX Command 
Draws a box in PICT with opposite corners defined by user-unit or 
pixel coordinates 








(xy) @’,y’) > 
{#x#y } {#x #y } > 
BUFLEN (4)(I/O) (NXT) SERIA BUFLE Command 
Returns the number of characters in the serial buffer and 1 if no error 
occurred. 
—> nT/F 

BYTES [(4) BYEES 
Returns the checksum and number of bytes of an object 

‘global’ — #checksum size object + name 
object — #checksum size object only 
BR BASE Bak 


Binary to real conversion 











Command 











#n > n 
Related Flags: —5 through -12 
CASE BREH EASE 
Begins CASE structure 
CASE 
test; THEN action; END 
testz THEN actiong END 












EASE 


test, THEN action, END 
default-action (optional) 


END 
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CEIL REAL (NXT) (NXT) GEIL 


Next greatest integer 


{ } Function 





x > n 
‘symb’ — ‘CEIL(symb)’ 
x_unit — n_unit 








Related Flag: -3 

CENTR (4) (PLOT) FFAF CERT 

Sets center of plot display. Supplying x implies (x,0). 
(x,y) > 


x = 
TEST 
(q)(MODES) FLAG CF 


Clears a system or user flag 








Command 










CF CE { } Command 





tn > 
CHOOSE ([PRGJNXT) IH CHOOS G Command 
Displays a choose box with the highlight positioned at the specified 
element. For further details, see Data Entry. 
“title” { list } start — obj 1 Ok 
“title” { {disp return} ...} start — 0 CAHCL or(CANCEL) 
CHR (q—) (CHARS) CHE { } Command 
TYPE CHE 


Makes a one-character string 


























n — “string” 
CESH 








CKSM (—) (VO) IOFAR 


Selects the checksum scheme 







n- 

1 1-digit arithmetic 

2 2-digit arithmetic 

3 3-digit CRC (default) 
Command 












CLEAR (4) 
Clears the stack 






objects > 


CLKADJ (4) CLEA { } Command 
Adds (subtracts) clock ticks to (from) the system time (8192 ticks/sec) 


tticks — 
CLLCD OUT CELLED 
Clears the stack display 
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CLOSEIO (4){(I/0) CLOSE Command 
Closes the serial port, clears input buffer and KERRM 
CLTEACH Command 
Purges the EXAMPLES directory 
CLUSR Command 
CLVAR 
Purges all user variables in the current directory 
CL (4) DATA CLE Command 
Purges the statistics matrix DAT 
CNRM HATE HORM CHEM { } Command 
Computes the maximum value of the sums of the absolute values of all 
elements over all columns 
[vector] — column-norm 
{{matrix]] — column-norm 
Note: Since a vector is considered a 1-row matrix, CNRM returns the 
sum of the absolute values of the elements in the vector. 
COL+ MATE COL cole G { } Command 
Inserts a column vector into a matrix or a number into a vector 
({{matrix]] [vector] index —  [[matrix]]’ 
[vector] z index —  [vector]’ 
COL- MATER COL COL- G { } Command 
Deletes a column from a matrix or a number from a vector 
[{matrix]] index — [[matrix]]’ [deleted_column] 
[vector] index — [vector]’ deleted_element 
COL—> MATER COL Cole G Command 
Transforms a series of column vectors into a matrix 
[vector] ... [vector,] n —  [[matrix]] 
COL MATR COL 4CO0L G { } Command 
Transforms a matrix into a series of column vectors 
({{matrix]] — [vector] ... [vector,] n 
COLCT (6) EUEES { } Command 
Collects like terms 
ZO Z 
‘symb;” — ‘symby’ 
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COL» Command 
Specifies dependent and independent columns in YDAT 
independent dependent — 
COMB PROE COMB { } Function 
Combinations of n objects taken m at a time 
nm > Cym 
‘symb’ n — ‘COMB(symb,n)’ 
n ‘symb’ — ‘COMB(n,symb)’ 
‘symb;’ ‘symb2’ — ‘COMB(symb,,symb>2)’ 

Related Flag: -3 
CON MATR MARE COW Command 
Creates a constant array or replaces the contents of an existing array or 
named array 


{ rows cols }} z —  [[matrix]] 
[vector;] z — [vector] 
[[matrix;]] z —  [[matrix]] 
‘name’ z > 
COND MATE HORM COWD G { } Function 


Estimates the column norm condition number of a square matrix 

[[matrix]] — condition-number 
CONIC [4) PYTYPE SORIC 
Selects conic plot 
CONJ CMPL COW 0 Function 
Complex conjugate 

x > X 
(wy) > (x-y) 
[R-array] — [R-array] 
(C-array;] — [C-array] 
‘symb’ — ‘CONJ(symb)’ 
Related Flag: -3 
CONLIB {4) CLOLIE COHLI G Command 
Displays the Constants Library catalog 
CONST {4 COLIE COWS G { } Function 
Returns the value of the specified constant 
‘constname’ —> constant 

Related Flags: 60, 61 
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CONT (a) Command 
Continues a halted program 
CONVERT (4) COM { } Command 
Performs a unit conversion 
x_old y_new — x’_new 
xy > x 
CORR (9) FIT CORR Command 
Correlation coefficient of DAT data in columns specified by COLY 
— correlation 
cos cos 


Cosine 


Z— cosz 
‘symb’ — ‘COS(symb)’ 
Related Flags: -3, -17, -18 
COSH HF COSH 
Hyperbolic cosine 


Z — coshz 
‘symb’ — ‘COSH(symb)’ 
Related Flag: -3 
COV (4) FIT coy Command 
Sample covariance of DAT data in columns specified by COL 
— covariance 
CR (Q)(/O) FRIHT CF 
Prints a carriage-right 
Related Flags: -33, -34, -37 
CRDIR (|) (MEMORY) CIF CREODIF { } Command 
Creates a directory 
‘name’ —> 
CROSS VECTE CROSS { } Command 
Cross product 
[A] [B] ~ [AxB] 
CSWP HATE COL CSP G { } Command 
Column swap 
{{matrix]] index; index —  [[matrix]] 


> 
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CYLIN 






(q) (MODES) AHGL RECT 
VECTR EYLIH 
Sets polar/cylindrical coordinate mode 
C—PX PICT CSPs 
User-unit to pixel coordinate conversion 
(x,y) > { #x #y } 

Note: Scaling information is derived from PPAR 
CR EMPL _C4R 

TYPE C+Rk 
Complex-to-real conversion 

(Xy) > xy 
[C-array] — [R-array;eai] [R-arrayjmag] 
DARCY (4)(EQLIB) UTILS G { } Function 
Calculates Darcy friction factor 
e/D Re > d 
‘symb’ x — ‘DARCY(symb,x)’ 
x ‘symb’ — ‘DARCY(x,symb)’ 
‘symb,’ ‘symby’ — ‘DARCY(symb,,symb>)’ 

Related Flag: —3 
DATE (4) (TIME) CATE 


Returns the system date 


G Command 


















{ } Command 















{ } Command 





































Command 










Related Flag: -42 


DATE (4) +DAT 
Sets the system date 





date —-> 











Related Flag: —42 


DATE+ = (4) (TIME) (NXT) GATE+ 
Adds a number of days to a date 
date tdays — date’ 









{ } Command 







Related Flag: 42 
DDAYS_ (4) DCAYS 


Number of days between two dates 
date; date — Adays 





{ } Command 






Related Flag: —42 
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DEC BASE DEC 
Sets decimal base 
Related Flags: —5 through —12 
DECR (q) (MEMORY) HEITH CECE 
Decrements then returns the value of a variable 
‘name’ —> x 
DEFINE (4) (DEF) { } Command 
Creates user-defined function 
‘name=expression® —> 

‘name(name, ... name,)=expression(name, ... name,) —> 
Related Flag: -3 
DEG (q—) (MODES) AHGL CEG 
Sets Degrees mode 
Related Flags: -17, -18 
DELALARM (4) ALEM CELAL Command 


Deletes one alarm or all alarms from the system alarm list 

n — Deletes specified alarm 

0 — _ Deletes all alarms 
DELAY (SJ FRIHT FRTFA CELAY Command 
sets 0 <n < 6.9 second delay between printed lines (1.8 second 
default) 


n-7 
Related Flags: —33, -34 
DELKEYS (4) KEYS DELE Command 
Clears user-key assignments 
rc.p — Clears a single key 
{ rc.p, rc.p2...} — Clears a list of keys 
‘S’ — Clears standard key definitions 
{ Sre.pj re.p2...} —> Clears list of keys & std key defs 
0 — Clears all user keys 

Related Flags: -61, -62 
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DEPND  (4)(PLOT) FFAF CEFH 
Specifies plot dependent column, variable, or range 
n 

‘name’ 

{ name } 

start end 

{ start end } 

{ name start end } 

{ name [initial values] tolerance } 


DEPTH (4) CEFTH Command 
Counts the objects on the stack 

objects — objects n 
DET MATE HORM DET 
Determinant of a square matrix 
{{matrix]] —> determinant 


DETACH {4 CETAC Command 
Detaches library from current directory 
library-number — 
— DIAG MATE $01AG G { } Command 
Returns vector of major diagonal elements 
{{matrix]] — [diagonals] 
DIAG NATE CIAG+ G Command 
Creates matrix with specified diagonal elements 
[diagonals] n — [[nxXn matrix]] 

[diagonals] {mn} — _ [[mxXn matrix]] 
DIFFEQ (4) BITRE DILPRE 
Selects differential equation plot 
DISP OUT OGISF { } Command 
Displays an object in medium font (5x7) on line n, where n=1 is the 
top line, n=7 is the bottom line 
object n > 
DO BRCH bo 
Begins DO loop 
DO loop-—clause UNTIL test-clause END 


Command 








LLibide 


























{ } Command 

















G Command 













ba Command 
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DOERR ERROR DOERR 
Generates system or user-defined error 

0 — Simulates (CANCEL) 

n — Issues machine error n 

#n — Issues machine error n 

“string” — Issues string error 
DOLIST LIST PROC BOLIS G Command 
Applies n arguments in lists to object. If object is a command, a 
program containing one command, or a user-defined function then n 
can be omitted. 

{ list; } ... { listy } n object — { results } 
{ list; } ... { list; } command — { results } 
DOSUBS LIST PROC pDOSUE 
Executes a program or command using arguments in a list 

{ list } n * program { list }’ 
{ list} n command -—> { list }’ 
{ list }n ‘name’ — { list }’ 
{ list } * program* — { list }’ 
Sera 
aed 


Command 







































G Command 





L 
















{ list } command { list }’ 
{ list } name { list }’ 
DOT MECTR 
Dot product of two vectors 
[vector A] [vectorB] — x 
DRAW (4) (PLOT) CRA 
Draws a plot 
Related Flags: —30, -31 
DRAX (4) DRA 
Draws axes 
DROP (6) Command 
Drops one object off the stack 

object 
DROPN (4) (STACK) (NXT) DEF H 
Drops n and n objects from the stack 
obj, ... objj n 
DROP2 = (4) (STACK) (NXT) PROFe 
Drops two objects from the stack 
obj2 obj; => 








DOT { } Command 
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DTAG TYPE CTAG 
Removes all tags from object 
:tag:obj — obj 
DUP (4) (STACK) (NXT) CUF 
Duplicates one object on the stack 
obj — obj obj 
DUPN (6) CUPH Command 
Duplicates n objects on the stack (excluding n) 
obj, ... Objj Nn — Objy... Obj, Objy ... obj, 
DUP2 (4) DURE Command 
Duplicates two objects on the stack 
obj, obj2 — obj; obj2 obj, obj 
D->R REAL Dk { } Command 
Degrees-to-radians conversion 
x — (m/180)x 
‘symb’ — ‘D—-R(symb)’ 
Related Flag: -3 
e (a) (4) ©) Function 
OHS £ 
Symbolic constant e 
— 2.71828182846 
> 
Related Flags: —2, -3 
EGV MATE EGY G { } Command 
Computes eigenvalues and right eigenvector of a square matrix 
[[matrix]] — [[eigenvector]] [eigenvalues] 
EGVL MATE EGYVL G { } Command 
Computes eigenvalues of a square matrix 
({[matrix]] — [eigenvalues] 
ELSE BRCH IF ELSE Command 
ERROR IFERR ELSE 
Begins false-clause in IF or IFERR structures 
END BECH IF EHD Command 
BRECH CASE EHD 
BRCH CO EHD 
BROCH WHILE EHD 
ERROR IFERR END 


Ends program structures 
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ENDSUB LIST PROC ENDS G Command 
Returns the number of frames in argument list for DOSUBS 
> on 
ENG (4) FHT ENG Command 
Sets Engineering display mode 
n- 
EQ-> TYFE Ets { } Command 
Separates equation into left and right sides 
‘symb,=symb2’ — ‘symb,’ ’symb’ 
z— z0 
‘name’ ‘name’ 0 
X_unit x_unit 0 
“symb’ ‘symb’ 0 
EQNLIB {(4) EG@LIE EGHLI G Command 
Displays the Equation Library Catalog 
ERASE  (4)(PLOT) ERASE 
Erases PICT 
ERRM ERROR ERRM 
Returns the last error message 
— “error message” 
ERRN ERROR ERRH Command 
Returns the last error number. Returns #70000h if the last error was 
generated by DOERR with a string argument. 
— #n 
ERRO ERROR ERRG 
Clears the last error number 
EVAL EVAL 
Evaluates an object 


obj 
:port:name 
:port: {path name} 
{ port:name, port:name, ... } 
Related Flag: —3 
EXP fe) { } J 0) Function 


Natural exponential 


exp Z 
‘“EXP(symb)’ 





Related Flag: -3 
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EXPAN (4) EFA { } Command 
Expands an algebraic 
ZO Zz 
‘symb;’ — ‘symb9’ 
EXPFIT (4)(STAT) EFAR MODL EXPFI 
Selects exponential curve-fitting model 
EXPM H''F EXEM { } 0) Function 
Natural exponential minus 1 
x — exp(x)-l 
‘symb’ — ‘EXPM(symb)’ 
Related Flag: -3 
EYEPT (4) So WEAR G Command 
EYEPT 
Specifies the coordinates of the eye-point in a 3D plot 
Xeye Yeye Zeye — 
Note: Yeye must be | unit less than Ynear 
FO (4) UTILS Fos G { } Function 
Calculates fraction of black-body emissive power at temperature T 
between wavelengths 0 and}. If units are not supplied, » is assumed 
to be meters and T is assumed to be K. 
fraction 
‘FO (symb,T)’ 
“FO (,symb)’ 
‘symb,’ ‘symb’ ‘FO (symb,,symb2)’ 
Related Flag: -3 
FACT { } Function 
Factorial or gamma function 
n n! 
x T(x+1) 
“symb’ ‘FACT(symb)’ 
Related Flag: -3 
FANNING (4)(EQLIB) UTILS FAHHI G { } Function 
Calculates Fanning friction factor 
e/D Re 
‘symb’ x 
x ‘symb’ 
‘symb,’ ‘symb,’ 
Related Flag: -3 
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f 

‘FANNING(symb,x)’ 
‘FANNING(x,symb)’ 
‘FANNING(symby,symb2)’ 


Sard 
~_ 
—- 
— 





FC? TEST FO? { } Command 
(q)(MODES) FLAG FL? 
Tests a system or user flag 
tn — T/F 
FC?C TEST FE?E { } Command 
(q) (MODES) FLAG FO?E 
Tests and clears a system or user flag 
tn — T/F 
FFT PRT FET G { } Command 
Discrete Fourier transform 
[vector] —  [vector]’ 
[{matrix]] —  [[matrix]]’ 
Note: Array dimensions must be a power of 2 
FINDALARM (4) ALEM FIHDA 
Returns alarm index n or 0 if no alarm is found 
First alarm due after a date and time: 
{ datetime} —- n 
First alarm due on a specified date: 
date > n 
First past due alarm: 
Q0-> n 
FINISH = (4) SREVE FIHIS 
Terminates Kermit server mode 
Related Flags: -33, -39 
FIX (4) FMT FIs 
Sets Fix display mode 


n-7- 
FLOOR REAL FLOOR { } Function 


Next smallest integer 


x > n 
‘symb’ — ‘FLOOR(symb)’ 
xX_unit — n_unit 
Related Flag: —3 
FOR BRCH FOR FOR 
Begins FOR structure 
start end FOR counter loop-clause NEXT 
start end FOR counter loop-clause increment STEP 
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FP REAL FF { } Function 
Fractional part 
x > y 
‘symb’ — ‘FP(symb)’ 
X_unit — y_unit 
Related Flag: -3 
FREE Command 
Frees (makes independent) merged memory, moving specified objects 
to the newly-independent RAM card. Retained for HP 48SX 
compatibility. 
{ } port > 
LID port > 
:port:name port > 
{ :port:names ... LIDs } port — 
Note: Ports 1 & 2 may be merged in the HP 48SX, but only port 1 may 
be merged in the HP 48GX. 


FREE1 = (4) (LIBRARY) FREE] G Command 
Frees (makes independent) merged memory, moving specified objects 
to the newly-independent RAM card in port 1 
tp = 
LID > 
:port:name —> 
{ :port:names ...LIDs } — 
FREEZE OUT FREES { } Command 
Freezes up to three display areas until a key is pressed. The least 
significant bits of n control which areas will be frozen. 
n-7 
Bit: 0 Status area 
1 Stack & command line 
2 Menu area 
FS? TEST FS? 
(q)(MODES) FLAG FS? 
Tests a system or user flag 
tn > T/F 
FS?C TEST FS? { } Command 
(—) (MODES) FLAG FS?C 
Tests and clears a system or user flag 
tn > T/F 
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FUNCTION (4) PTYPE FUHE Command 
Selects function plot 
GET LIST ELEM GET Command 
Gets an element from a list, vector, or matrix 
{ list } position — object 
‘name’ position — object 
[vector] position — 
[[matrix]] position —> 
[{matrix]] {rowcol} —-> 
‘name’ {rowcol} —> z 
Note: Position arguments for matricies are specified in row order 
GETI LIST ELEM GETI Command 
Gets an element from a list, vector, or matrix, increments and returns 
the position, and returns the list. Sets flag -64 if the position wraps to 
the first element, otherwise clears flag —64. 
{ list } position — { list } position’ object 
‘name’ position ‘name’ position’ object 


[{matrix]] position ({[matrix]] position’ z 
{{matrix]] { row col } {{matrix]] { row col’ } z 
‘name’ {rowcol} — ‘name’ { rowcol’ } z 
Related flag: -64 
Note: Position arguments for matrices are specified in row order 
GOR GROB GOR Command 
Superimposes grob’ onto grob at the specified coordinates 
grob (x,y) grob’ grob’’ 
grob { #x #y } grob’ 
PICT (x,y) grob’ 
PICT {#x #y } grob’ 
GRAD (4) (MODES) AH GL 
Sets Grads mode 
GRAPH Command 
Enters the graphics environment until is pressed 
GRIDMAP (4) (PLOTJ(NXT) #0 FTYFE GEIL. G Command 
Selects the gridmap plot type 


=~ 

[vector] position — [vector] position’ z 
=> 
~_> 
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—GROB GROB +GEO { } Command 
Converts object into graphics object 
object n — grob 
EquationWriter picture 
Small font (3x5) 
Medium font (5x7) 
Large font (5x9) 
Related Flags: 45 through —51 
GXOR GROB GHOR Command 
Superimposes and inverts grob’ onto grob at the specified coordinates 
grob (x,y) grob’ —  grob’’ 
grob { #x#y } grob’ — grob’’ 
PICT (x,y) grob’> —> 
PICT {#x #y } grob’ -> 
*H (4) FFAR #H Command 
Multiplies the vertical plot scale by specified factor (alters PPAR) 
x > 
HALT RUM HALT Command 
Suspends program execution until either CONT or KILL are executed 
HEAD (6) HEAL G Command 
LIST ELEM HEAL 
Returns the first object in a list or the first character in a string 
{ objy ... obj, } —> objy 
“ABCD” — “A” 
HEX BASE HE 
Sets hexadecimal base 
Related Flags: —5 through —12 
HISTOGRAM (4) STAT FPIYFE Command 
HES Ta 
Selects histogram plot 
HISTPLOT (4) FLOT HISTF Command 
Draws a histogram of the data in XDAT 
HMS+ (4) (TIME) (NXT) HIS + { } Command 
Adds in HH.MMSSs format 
hms; hms — hms, + hmsg 
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HMS- —s (4) (TIME) (NXT) HS - 
Subtracts in HH.MMSSs format 
hms; hmsz — hms, —hms 
HMS—> = (4) (TIME) (NXT) HN 5 
Converts a number from HH.MMSSs format 
hms —> x 
—-HMS [4 +HMS 
Converts a number to HH.MMSSs format 
x — hms 
HOME (P) Command 
Selects the HOME directory 
i (a) (6) 0 o Function 
COWS 


Symbolic constant i 


Related Flags: —2, -3 
IDN MATE MARE ICH { } Command 


Creates an identity matrix 
n —  [[nxn real—identity—matrix]] 
[{matrix]] —  [[identity—matrix]] 
‘name’ — Replaces named matrix 
IF BROH IF IF 
Begins IF structure 
IF test THEN true-clause END 
IF test THEN true-clause ELSE false-clause END 
IFERR ERROR IFERR IFERR Command 
Begins IFERR structure 
IFERR trap-clause THEN error-clause END 
IFERR trap-clause THEN error-clause ELSE normal-clause END 
Related Flag: -55 
IFFT FFT IFFT G { } Command 
Inverse discrete Fourier transform 
[vector] — [vector]’ 
[{matrix]] —  [[matrix]]’ 
Note: Array dimensions must be a power of 2 
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IFT EBERCH IFT Command 
IF ... THEN ... END test. Executes object if T/F is true. 
T/F object > 
IFTE ERCH eas d Function 
IF ... THEN ... ELSE ... END test. Executes true-obj if T/F is true 
T/F true-obj false-obj —-> 
‘symb’ true-obj false-obj) —> ‘IFTE(symb,true-obj,false-obj)’ 
IM CMFL IM { } Function 
Returns imaginary part of a number or array 
x > 0 
(x,y) > 
{R-array] — [zero R-array] 
[C-array] — [R-array] 
‘symb’ — ‘IM(symb)’ 
Related Flag: -3 
INCR (—) (MEMORY) AR ITH IHCR 
Increments then returns the value of a variable 
‘name’ —> x 
INDEP = (4) (PLOT) FFAR IHDEF Command 
Specifies plot independent column, variable, or range 
n-> 
‘name’ —> 
{name} —> 
start end —> 
{ start end} —-> 
{ name start end} —> 
INFORM IH IHFOR G Command 
Displays an input form and waits for user input. INFORM terminates 
when the user presses (CANCEL), CAHCL,or GE . For further 
details, see Data Entry. 
“title” {labels} format {defaults} {initial_values} —> {data} 1 
“title” {labels} format {defaults} {initial values} —> Ocancelled 
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INPUT IH IHPUT Command 
Suspends program, displays message, and waits for data. The modes 
can be one or more of: ALG (algebraic/program-entry mode), o (alpha 
lock), or V (verify syntax). If column is 0 it specifies the end of the 
row. A positive value for row (or column if only the column is 
specified) displays the insert cursor; a negative value specifies the 
replace cursor. The level 1 list may contain any of these options in 
any order. For further details, see Data Entry. 
“message” “prompt” — “result” 
“message” { mode(s) } “result” 
“message” { “prompt” column } “result” 


“result” 
“result” 


“message” { “prompt” column mode(s) } 
“message” { “prompt” { row column } mode(s) } 
INV \% 
Inverse (reciprocal) 


Sara 

Sera 
“message” { “prompt” mode(s) }} — “result” 

Saeed 

=_> 

{ 


Zz 1/z 
[[matrix]] [{1/matrix]] 
“symb’ ‘INV(symb)’ 
X_unit 1/x_1/unit 
Related Flag: -3 
IP REAL { } Function 
Integer part 
X n 
“symb’ ‘IP(symb)’ 
xX_unit n_unit 
Related Flag: -3 
ISOL (=) (SYMBOLIC) 1S0L 
Isolates a variable in an equation 
‘symb,’ ‘global’ — 
Related Flags: -1, -3 
KERRM [(4) KERR 
Returns the last Kermit error message 
— “message” 
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KEY IH EEY Command 
Returns 0 if no key has been pressed, otherwise 1 in level 1 and the 
keycode in level 2 


KGET = (4/0) SEVR EGET 
Gets named data from a remote device 
‘name’ 
“name” 
{ remote-name local-name } 
{ name; name> ...} 
{ { remote-name, local-name, } name>... } 
Related Flags: —33, -35, —36, -39 
KILL RUM KILL Command 
Cancels all suspended programs 
LABEL {4 LABEL Command 
Labels axes 
Related Flag: —30 


LAST ERROR LASTA 
LASTARG 
Returns arguments (saved if flag —55 is clear) 

— Last_Arguments 


Related Flag: -55 
LCD—- GROB Chas 
Returns LCD as 131X64 pixel graphics object 
—  grob 
—LCD GROB +LCb Command 
Displays graphics object at the upper-left corner of the stack display 
grob > 

LIBEVAL G Command 
Executes library object given its six-digit (hex) binary integer 
reference. The upper three digits are the library number and the lower 
three digits are the function number in the library. 

#n > 
LIBS (4) LIBS Command 
Lists library objects attached to current directory 

— { “title,” library-number, port ... } 
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LINE FICT LIHE 
Draws a line in PICT between two coordinates 
(xy1) (x22) > 
C#x1 #y1 } { #x2 #y2 } > 
XLINE (4)(STAT) FIT =ELIHE Command 
Returns best-fit line for data in DAT with values for a and b filled in 
Linear model — ‘a+b*X’ 
Logarithmic model — ‘a+b*LN(X)’ 
Exponential model — ‘a*EXP(b*X)’ 
Power model — ‘a*X*b’ 
LINFIT {4) EPAR WOGL LIWFI Command 
Selects linear curve-fitting model 
LININ TEST LIHIH G Command 
Determines whether an equation is linear in a variable 
‘symb’ ‘name’ — T/F 
LIST> Command 
Separates a list into individual objects 
{ objy ... objn } — objy ... objp n 
LIST LISi #ListT Command 
Combines n objects into a list 
obj; ... obj, n > { objy ... objp } 
ALIST LIST LIST G Command 
Computes the first differences of objects in a list 
{ obj, objg obj3... obj, } —> { obja_1 objz_2 ... } 
XLIST LIST =ELIST G Command 
Sums the elements in a list 
{ obj, objz ... objn } —> objy+objot+...tobjy 
Related Flags: —-5 through —10 
TILIST LIST wLIST G Command 
Returns the product of elements in a list 
{ obj, Objz ... objnp } —> obj *objo*...*objn 
Related Flags: —S through —10 
LN (r) 
Natural logarithm 
z— Inz 
‘symb’ — ‘LN(symb)’ 
Related Flags: -1, -3, -22 
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LNP1 Hi'F LHF { } J 0 Function 
Natural logarithm of (argument + 1) 
x — In(1+x) 
‘symb’ — ‘LNP1(symb)’ 
Related Flags: —3, -22 
LOG (P) { } 
Common (base 10) logarithm 
z — logz 
‘symb’ — ‘LOG(symb)’ 
Related Flags: -1, —3, -22 
LOGFIT (4) EFAR WHOGL LOGFI 
Selects logarithmic curve-fitting model 
LQ MATR FACTR Loa G { } Command 
Returns the LQ factorization of a matrix 
[{matrix A]] —  [[matrix L]] [[matrix Q]] [[matrix P]] 
LR (SJ FIT LE Command 
Computes linear regression of DAT data 
— intercept slope 
LSQ MATER LSo G { } Command 
(4) S7S Lse 
Returns the minimum norm least squares solution to under- or over- 
determined system of linear equations AX=B. 
[vector B] [[matrix A]] — [vector X] 
[[matrix B]] [[matrix A]] —  [[matrix X]] 
Related Flag: -54 
LU MATE FACTRE LU G Command 
Returns the Crout LU decomposition of a square matrix 
[{matrix A]] —  [[matrix L]] [[matrix U]] [[matrix P]] 
MANT REAL MAHT { } Function 
Returns the mantissa of a number 
x > y 
‘symb’ — ‘MANT(symb)’ 
Related Flag: -3 
TMATCH (4) +hMAT Command 
Match-and-replace, beginning with subexpressions 
‘symb’ { ‘pattern’ ‘replacement’ } — ‘result’ T/F 
‘symb’ { ‘pattern’ ‘replacement’ ‘conditional’ } — ‘result’ T/F 
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MATCH (4) (SYMBOLIC) (NXT) + HAT Command 
Match-and-replace, beginning with top-level expression 
‘symb’ { ‘pattern’ ‘replacement’ } — ‘result’ T/F 
‘symb’ { ‘pattern’ ‘replacement’ ‘conditional’ } — ‘result’ T/F 
MAX REAL WAS { } Function 
Returns the maximum of two numbers 
xX y — max(x,y) 
x ‘symb’ — ‘MAX(x,symb)’ 
‘symb’ x — ‘MAX(symb,x)’ 
‘symb,’ ‘symb2’ — ‘MAX(symb,,symb2)’ 
X_unit y_unit — max(x,y)_unit 




















Related Flag: -3 
MAXR COWS MASE 


Symbolic constant — maximum HP 48 real number 
— 9.99999999999E499 
—> ‘MAXR’ 








0 Function 















Related Flags: -2, -3 
MAX> (a) IVAR MARE 
Finds the maximum column values of the data in YDAT 
> x 
> [x,.-Xm] 
MCALC (4q)(EQLIB) MES MEAL G {} Command 
Sets Multiple Equation Solver variable to not user-defined state 
‘name’ —> 
“ALL” 7> 






Command 






















Related Flag: 63 
MEAN (4) IVAR MEAH 
Computes means of the data in XDAT 
> x 

> [x,..Xm] 








Command 



















MEM (4) (MEMORY) MEF Command 
Performs garbage collection and returns available memory (see 
Temporary Memory) 






= 2% 
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MENU (4) MEHU MEHU Command 
Selects a built-in menu or creates a custom menu (see Built-in Menus) 
mm.pp —> 

‘list-name’ —> 
{ names and commands} —> 
MERGE Command 
Merges RAM card with main memory. Retained for HP 48SX 
compatibility. 
















port > 
Note: Ports 1 & 2 may be merged in the HP 48SX, but only port 1 may 
be merged in the HP 48GX. 
MERGE1 {4 MERG G Command 
Merges RAM card in port 1 with main memory 
MIN REAL MIH 
Returns the minimum of two numbers 
x y — min(x,y) 
x ‘symb’ — ‘MIN(x,symb)’ 
‘symb’ x — ‘MIN(symb,x)’ 
‘symb,’ ‘symb2’ — ‘MIN(symb,,symb2)’ 
X_unit y_unit — min(x,y)_unit 

















{ } Function 










Related Flag: —3 
MINEHUNT (4) UTILS WIHE G Command 
Starts the Minehunt game 
MINIT (a) MES MIHIT G Command 
Establishes Mpar from EQ 
MINR COWS MIHF O Function 
Symbolic constant — minimum HP 48 real number 

— 1.E-499 

— ‘MINR’ 





Related Flags: —2, -3 
MIN» (q) (STAT) 1VAR MINE 
FInds the minimum column values of the data in SDAT 
> x 

> [x,..Xm] 












Command 
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MITM (4) ‘HES MITM 
Changes the title and variable menu in Mpar 

“title” { name ,...name,} —> 
Note: Use ““‘ to include a blank label. 
MOD REAL Moo 
Modulo 


G Command 

















x y — xmody 
x ‘symb’ — ‘MOD(x,symb)’ 
‘symb’ x — ‘MOD(symb,x)’ 
‘symb,;’ ‘symb2’ — ‘MOD(symb,,symb2)’ 

Related Flag: -3 
MROOT [{4) MES MROO G Command 
Solves for single or all variables using the Multiple Equation Solver 

‘name’ — value 

“ALL” —-> 
MSGBOX OUT MSGB G { } Command 
Displays a message (up to 75 characters) and waits for 
acknowledgement keystroke 

“message” —> 

MSOLVR (4) MES MSOL G Command 
Displays the Multiple Equation Solver menu 
Related Flag: 63 
MUSER_ (4) MES MUSE G { } Command 
Sets Multiple Equation Solver variable to user-defined state 

‘name’ —> 

“ALL” —-> 






















Related Flag: 63 


NDIST PROB HOLST 
Normal probability density 
mean variance x —  ndist(mean, variance, x) 









G { } Command 
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NEG { } J 0 Function 
CHPL HEG 
Negates an argument 
Zz -Z 
#n, —> #n2 (two’s complement) 
X_unit — —x_unit 
[vector] — [-vector] 
{{matrix]] — [[-matrix]] 
‘symb’ — ‘-(symb)’ 
grob — inverted_grob 
PICT — inverts PICT 
Related Flags: -3, -5 through -10 
NEWOB (4) HEWO Command 
Separates object from list or backup object (see Temporary Memory) 
object — object 
Related Flag: -55 (Should be set if freeing an object from a list) 
NEXT BRCH START HES Command 
BRCH FOR HEM 
Ends FOR ... NEXT or START ... NEXT 


NOT BASE LOGIC HOT { } Function 
TEST HOT 
Logical or binary NOT 


#4 = 
x > 
‘symb’?’ — ‘NOT(symb)’ 
“string;” — “stringy” 
Related Flags: —3, -5 through —10 
NOVAL IH HOVA G Command 
Placeholder for unspecified values in INFORM field data list 
— NOVAL 
Note: HP 48 operating system versions K and L contain an error — 
NOVAL doesn’t place itself on the stack. If you’re writing a program 
to be distributed to a wide audience, it may be best to use the sequence 
{ NOVAL 3 HEAD when you need to place NOVAL on the stack. 
NSUB LIST PROC HSUB G Command 
Returns the current frame number for DOSUBS 
> on 
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NUM (6) HUH 
TYPE HUT 
Returns character code of a string’s first character 
“string? —> n 
NUM (4) 
Evaluates an object to yield a numeric result 
object > z 
NUMX (4) So VEAR G Command 
HUM 
Specifies number of plot increments in X for 3D plot types (must be 
> 2) 
n~> 
NUMY (4) SD VPAR G Command 
HUY 
Specifies number of plot increments in Y for 3D plot types (must be 
22) 


n—- 


N» (q) (STAT) SUNS HE Command 
Returns the number of data points in YDAT 


> on 
OBJ TYRE QBU> Command 
(4) (CHARS) (NXT) OB I+ 
Decomposes an object into individual components. String objects are 
executed as a command line after the “”’ delimiters have been 
removed. 
:tag:object object “tag” 
(wy) 9 x y 
X_units x l_units 
‘X+Y’ xX Y 2 + 
[xX]... Xp] Xy...Xp N 
([xq1 X12 -- Xam] Xq1--Xmn {nm } 
{ obj, ... obj, } obj; ... obj, n 
“string” 
OCT BASE OCT Command 
Sets octal base 
Related Flags: —5 through —12 
OFF OFF Command 


Turns the calculator off 
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OLDPRT [4) PRIHT PRTPA OLDPR 
Remaps printer output to the HP 82240A character set 
OPENIO (4) (V/O) (NXT) SERIA OFPEHT 
Opens IR port or wired serial port 
Related Flag: —33 
OR BASE LOGIC = oR 
TEST OR 
Logical or binary OR 
#n #n2 
xy 
x ‘symb’ *x OR symb’ 
‘symb’ x ‘symb OR x’ 
‘symb,’ ‘symb,’ ‘symb,; OR symby’ 
“string,” “string,” “string3” 
Related Flags: —3, —5 through —10 
ORDER [4) DIR ORDER 
Rearranges the VAR menu 
names} —> 

OVER (4) OVER Command 
Copies the object in level 2 into level 1 

objz obj; - obj obj, obj2 
PARAMETRIC (4) FTYFE FAFA Command 
Selects parametric plot 
PARITY (4) LOPAR: PARIT Command 
Sets parity. n<0 indicates transmit parity only 

n- 
0 none 
1 odd 
2 even 
3 mark 
4 space 
PARSURFACE {4 SO PFTYFE G Command 
FAR SU 
Selects parametric surface plot 
PATH (4) CIF FATH Command 
Returns a list showing the current path 
— { HOME directory—names } 
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PCOEF (4)(SOLVE) FOLY FEOEF G { } Command 
Computes coefficients of a polynomial with specified roots 
[roots] — [coefficients] 
PCONTOUR ([4) So PTYFE G Command 
FCOH 
Selects the pcontour plot type 
PCOV (SJ FIT POY 
Population covariance of DAT data in columns specified by COLY 
— covariance 

PDIM FICT POIM Command 
Changes the size of PICT 

(XminsYmin) (XmaxsYmax) — Changes PICT relative to the 

current user coordinates 
#horizontal #vertical — Does not affect current user 
coordinates 
Note: The width of PICT cannot exceed 2048 pixels 
PERM PROB PERM { } Function 
Permutations of n objects taken m at a time 
nm — Pom 

‘PERM(symb,m)’ 


‘symb’ m > 
n ‘symb’ — ‘PERM(n,symb)’ 
a> 


‘symb,’ ‘symb9’ ‘PERM(symb,,symb2) 


Related Flag: —3 
PEVAL (4)(SOLVE) FOL’ FEWAL G { } Command 
Evaluates polynomial with specified coefficients at x 
[coefficients] x — y 
PGDIR' {4 DIR POGDIF { } Command 
Purges specified directory and its contents 
‘name’ —> 
PICK (4) (STACK) FICK 
Copies nth object into level 1 (excluding n) 
objy ... obj) Nn —> Objp... objy Objy 
PICT FICT FICT Command 
Returns the name PICT to level 1 
— PICT 


PICTURE (4) G Command 
Enters the graphics environment until is pressed 
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PINIT (9) FIHIT G Command 
Initializes a memory card in port 2 
PIXOFF FICT FINOF 
Turns off a pixel in PICT 
(xy) > 
{#x#y} 7 
PIXON PICT FIBOH Command 
Turns on a pixel in PICT 
(xy) > 
{#x#y} > 
PIX? PICT FIR? Command 
Tests a pixel in PICT 
(xy) — T/F 
{#x#y} -— T/F 
PKT (6) SEVERE PET Command 
Sends commands to server 
“contents” “type” — “response” 
Related Flags: -33, -35, -39 
PMAX Command 
Sets the upper-right plot coordinates 
(xy) > 
PMIN Command 
Sets the lower-left plot coordinates 
(xy) > 
POLAR (4)(PLOT) FTV FE FOLAR 
Selects polar plot 
POS Ga FOS 
Eig) EEEM 2POs 
Finds a substring in a string or finds an object in a list 
“string” “substring” — n 
{ list } obj > n 
PREDV { } Command 
Predicted dependent variable value 
x —  predicted_value 
PREDX ({4) FIT PREDS { } Command 
Predicted independent variable value 
y —-  predicted_value 
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PREDY (4) FIT PRED { } Command 
Predicted dependent variable value 
X — predicted_value 

PRLCD  [(4) FRIHT PRLOD 
Prints an image of the display 
Related Flags: -33, -34 
PROMPT TH PROM Command 
Displays prompt and halts program 

“prompt” —> 
PROOT {[(4) POLY PROGT G { } Command 
Computes roots of polynomial with real or complex coefficients 

[Z1..Z,] — [roots ] 
Related Flag: —22 
PRST (6) FRIHT FRST Command 
Prints the stack 
Related Flags: —33, -34, -37, -38 
PRSTC {4} PRINT PRSTC Command 
Prints the stack in compact format 
Related Flags: —33, —34, —37, -38 


PRVAR_ {4} PRIHT PREVAR { } Command 
Prints the name and contents of one or more variables 
‘name’ —> 


:port:name —> 
Related Flags: —33, -34, -37, -38 
PR1 (4) 0) FRIHT FRI 
Prints the level 1 object 
object — object 
Related Flags: -33, -34, -37 
PSDEV (4) (STAT) 1 AF PSOE G Command 
Computes population standard deviation of the data in XDAT 
> x 


PURGE (4) (PURGE) { } Command 
Purges one or more variables 
‘global’ 
:port:name 
LID 
PICT 
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PUT List ELEM  - FUT Command 
Replaces an element in an array or list 
{ list; } position obj — { list } 
‘name’ position obj — 
[vector;] position z — [vector] 
[[matrix;]] position z — [[matrix>]] 
({{matrix;]] {rowcol} z —  [[matrix]] 
‘name’ {rowcol} z > 
PUTI LIST ELEM PUTI Command 
Replaces an element in an array or list and increments and returns the 
position. Sets flag —64 if the position wraps to the first element, 
otherwise clears flag -64. 
{ list; } position obj — { listz } position’ 
‘name’ position obj — ‘name’ position’ 
[vector] position z — [vector] position’ 
[[matrix;]] position z — [[matrix>]] position’ 
({[matrix;]] {rowcol} z — [[matrix2]] { rowcol }’ 
‘name’ {rowcol} z — ‘name’ { rowcol }’ 
Related flag: -64 


Note: Position arguments for matrices are specified in row order 


PVAR (4) 1VAR PYAR G Command 
Population variances of XDAT data in columns specified by COLY 


PVARS = (4) FVARS Command 
Returns list of backup objects and library objects and the type of 
memory (or amount of memory if independent RAM) 
port — { list } “ROM” 
port —> {list} “SYSRAM” 
port — {list } bytes 
PVIEW FICT FYIEM Command 
OUT PY¥IEW 
Displays PICT with the specified coordinate or pixel at the upper-left 
comer. An empty list displays PICT centered in the display, ready to 
scroll until is pressed. 
(xy) > 
{#x #y} 7 
ie i: 
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PWRFIT (4) 2PAR MOGL FHEFI 
Selects power curve-fitting model 
PX—>C PICT PHS 
Pixel to user-unit coordinate conversion 
{#x #y} — (xy) 
Note: Scaling information is derived from PPAR 
Q GT) +0 
Converts numbers to fractional equivalent 
x — ‘alb’ 
(x,y) — ‘a/btc/d#i’ 
‘X+1.4 — ‘K+4+7/5’ 
Note: The display mode (such as 2 FIX) affects the result 
Qn (4) +n Command 
—Q after factoring out 7 
x ‘a/b*Tt’ 
X ‘alb’ 
(x,y) ‘a/bxtt+c/d*1*1’ 
(x,y) ‘albetit+c/dxi’ 
(x,y) ‘alb+c/d*1xi’ 
(x,y) ‘alb+c/dxi’ 
*(2.5,3.5)#X’ §(5/24+-7/2*i)*X? 
Note: The display mode (such as 2 FIX) affects the result 
QR MATE FACTE Ge G { } Command 
Computes the QR factorization of a matrix 
[{matrix A]] —  [[matrix Q]] [[matrix R]] [[matrix P]] 
QUAD (4) GUAG { } Command 
Solves a quadratic polynomial 
‘symb,’ ‘global?’ — ‘symb’ 
Related Flag: —-1 
QUOTE {4 UOT Function 
Returns argument expression unevaluated 
‘symb’ — ‘symb’ 
RAD (4) 
(q) (MODES) AHGL RAD 
Sets Radians mode 
Related Flags: -17, -18 
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RAND PROB REAHD 
Returns a random number in the range 0 <x < 1 
> x 
RANK HATE HORM RANE  G{ } Command 
Estimates the rank of a rectangular matrix 
[[matrix]] — rank 
| Related Flag: -54 
RANM MATER MAKE RAHM G Command 
Replaces or creates a random matrix of specified dimensions whose 
elements are integers in the range -9 <n <9. O is twice as likely to 
occur as other values. 
[{matrix]] —  [[matrix]]’ 
{ rows cols } —  [[matrix]] 


RCEQ (6) () EG Command 

(4) eb (P) Ea 
Recalls the current contents of the variable EQ 

— obj 
RCI MATE ROW FCI G { } Command 
Multiplies elements in a row of a matrix by a factor 
{{matrix]] factor row —  [[matrix]]’ 

RCIJ MATE ROM ROTO G { } Command 
Multiplies elements in row; of a matrix by a factor and adds the result 
to elements in row; 

{{matrix]] factor i j —  [[matrix]]’ 


RCL (P) Command 
Recalls the contents of a variable or backup object 
‘name’ — obj 
PICT — grob 
:port:name — obj 
:port:{path name } — obj 
RCLALARM {4) ALEM FECLAL { } Command 


Recalls alarm from alarm list 


n — { date time action repeat } 
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RCLF (4) FLAG RELF Command 
Returns a list containing two binary integers representing the system 
and user flags. The least significant bit of each binary integer 
represents flag 1. 








— { #system #user } 
Note: The binary integer wordsize should be set to 64 bits 
RCLKEYS ({4) EEYS RBCLE Command 
Lists user-key assignments. S indicates standard keys are active. 

— { obj; rc.p, ... obj, rc-py } 

— {S objj rc.py ... obj, rc.p, } 
























Related Flags: -61, -62 
RCLMENU (4) MEHU RCLM 
Recalls number and page of active menu 
— mm.pp 
Note: Menu number assignments are different between the 
HP 48S/SX and the HP 48G/GX. See Built-in Menus. 
RCL> (4) (PLOT) (NXT) STAT CATA (P) ECDAT Command 
(q) (STAT) CATA (P) EGAT 
Recalls the current contents of the variable XSDAT 
— object 
RCWS BASE ROHS 
Recalls the binary integer wordsize 
> on 











Command 



















Related Flags: —5 through —-12 
RDM MATE WARE FOAM Command 
Redimensions a matrix. Extra elements are dropped, missing elements 
are padded with zeros. 
[vector;] { cols }} — [vector] 
[vector] { rowscols }} — [matrix] 
[{matrix]] {cols } — [vector] 
[{matrix;]] { rowscols } —  [[matrix]] 
a 
ard 






















‘name’ { cols } 
‘name’ { rows cols } 
RDZ FROB EDZ Command 
Sets the random number seed. 0 will use the system clock. 

x > 
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RE EMPL RE { } Function 


Returns the real part of a complex number, array, or unit object 


x x 
(x,y) x 
[R-array] —> [R-array] 
[C-array] [R-array] 
‘symb’ “RE(symb)’ 
X_unit x 
Related Flag: -3 


RECN (4) RECH Command 
Receives file from remote Kermit and saves in an object named in 
level 1 
‘name’ —> 
“name” — 
Related Flags: -33, -35, —36, -39 
RECT (—) (MODES) AHGL FECT 
WECTR RECT 
Sets rectangular coordinate mode 
RECV (9) RECY Command 
Receives file from remote Kermit and saves in a sender-named object 
Related Flags: —33, -35, -36, —39 
REPEAT BRECH WHILE FEFEA 
Begins loop clause in WHILE ... REPEAT ... END 
TIF > 


REPL (4) (CHARS) FEFL 
MATR MARE REPL 
ELS]: REPRE 
GROB REPL 
Replaces the level 1 object onto the level 3 object at the location 
specified in level 2 
{ list} n {sublist} — { list’ } 
“string” n “substring” — “string” 
grob (x,y) subgrob —  grob’ 
grob { #x#y } subgrob —  grob’ 
PICT (x,y) subgrob —> 
PICT { #x#y } subgrob —> 
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RES (6) FFAR FES Command 
Sets the plot resolution in user-unit or pixel intervals 
n — Interval in user-units 
#n — Interval in pixels 
RESTORE (4) RESTO Command 
Replaces HOME directory with backup copy 
backup —> 
:port:backup —> 
REVLIST LIST FEYLI G Command 
LIST PROC REVLI 
Reverses the order of objects in a list 
{ obj, ... obj, } > { objy ... objy } 
RKF (4) DIFFE REF G Command 
Computes the solution of the initial value problem for a differential 
equation using the Runge-Kutta-Fehlberg (4,5) method 
{ to yo f(t,y) } tolerance te — { to yo f(t,y) } tolerance 
{ to yo f(t.y) } { tolerance hsize } tg > { to yo f(t,y) } tolerance 
RKFERR (4) DIFFE REFE G Command 
Computes the change in solution and absolute error estimate for a 
specified step for a differential equation using the Runge-Kutta- 
Fehlberg (4,5) method 
{ty f(t,y) } stepsize — {ty f(t,y) } stepsize Ay error 
RKFSTEP (4) DIFFE REFS G Command 
Computes the next solution step of the initial value problem for a 
differential equation within a given error tolerance using the Runge- 
Kutta-Fehlberg (4,5) method 
{ ty f(t,y) } tolerance stepsize — {ty f(t,y) } tolerance next-step 
RL BASE BIT FL { } Command 
Rotates left by one bit 
#ny — #no 
Related Flags: —5 through —12 
RLB BASE BYTE RLE { } Command 
Rotates left by one byte 
#n4 — #2 
Related Flags: —5 through -12 
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RND REAL RHE { } Function 
Rounds a number to n decimal places if 0 <n < 11, ton significant 
digits if -11 <n <-1, or to the current display format if n=12 









Z7n-7 Z 
z ‘symb’ — ‘RND(z,symb)’ 
‘symb’ x — ‘RND(symb,x)’ 
‘symb,’ ‘symb2’ — ‘RND(symb,,symb2) 
X_unit n — x’_unit 
X_unit ‘symb’ — ‘RND(x_unit,symb)’ 
[vector;] n — [vector] 
[[matrix;]] — [[matrix,]] 






Related Flag: -3 


RNRM MATR HORM RHRM { } Command 
Computes the maximum value of the sums of the absolute values of all 
elements over all rows 


















[vector] — row-norm 

{[matrix]] — row-norm 
Note. Since a vector is considered a 1-row matrix, RNRM returns the 
element in the vector having the largest absolute value. 
ROLL (4) ROLL 
Moves level n+1 object to level 1 
Objy ... objj Nn — Objp_1 ... Obj, Objy 
ROLLD (4) ROLLE Command 
Moves the level 2 object to level n 
obj; ... obj, n — Obj, obj, ... Objn_y 
ROOT (q) (SOLVE) FOOT FOOT 


Finds a numerical root 












Command 












Command 








‘symb’ ‘global’ guess — root 

‘symb ‘global’ { guess; guessz } — root 

‘symb’ ‘global’ { guess; guessz guess3 } — root 
*program® ‘global’ guess — root 

*program*® ‘global’ { guess; guessz }} — root 
“program ‘global’ { guess; guess guess3 }} — root 





310 Command Reference 


ROT Gal} ROT Command 
Moves the level 3 object to level 1 
obj3 objz objy — objg obj, obj3 
ROW+ MATER ROM FoOu+ G { } Command 
Inserts a row vector into a matrix or a number into a vector 
{{matrix]] [vector] index — [[matrix]]’ 
[vector] z index —  [vector]’ 
ROW- MATE ROW FOR G { } Command 
Deletes a row from a matrix or a number from a vector 
[{matrix]] index — [[matrix]]’ [deleted_row] 
[vector] index — [vector]’ deleted_element 
ROW- MATE FO ROWS G Command 
Transforms a series of row vectors into a matrix 
[vector;] ... [vector,] n —  [[matrix]] 
—ROW MATE ROW +RoOW G { } Command 
Transforms a matrix into a series of row vectors 
{[matrix]] — [vector] ... [vector,] n 
RR BASE Bit = RR { } Command 
Rotates right by one bit 
#n, — #n2 
Related Flags: —5 through -12 
BYTE ERE 
Rotates right by one byte 
#ny — #n2 
Related Flags: —5 through —12 
RREF MATE FACTR RREF G Command 
Computes the reduced row-echelon form of a rectangular matrix 
[{matrix]] —  [[matrix]]’ 
Related Flag: -54 
RRK (J DIFFE FRE G Command 
Computes the solution of the initial value problem for a differential 
equation using the Rosenbrock (3,4) and Runge-Kutta-Fehlberg (4,5) 
methods 
{ to yo f(t,y) } tolerance te — { to yo f(t,y) } tolerance 
{ ty f(t,y) Of/0T Of/dy } { tol hsize } ts > 
{ ty f(t,y) Of/0T Of/dy } tolerance 
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RRKSTEP (4) DIFFE RRES G Command 
Computes the next solution step of the initial value problem within a 
specified error tolerance using the Rosenbrock (3,4) Runge-Kutta- 
Fehlberg (4,5) methods 

{ ty f(t,y) Of/0T Of/dy } tol stepsize 
{ ty f(t,y) df/dT df/dy } tol next-step 
RSBERR_ (4) DIFFE RSBER G Command 
Computes the change in solution and absolute error estimate using the 
Rosenbrock (3,4) and Runge-Kutta-Fehlberg (4,5) method 

{ ty f(t,y) Af/0T df/dy } stepsize > 
{ ty f(t,y) Of/dT Of/dy } stepsize Ay error 
RSD MATE RSo { } Command 
Computes a correction to the solution of a system of equations 

[vector B] [[matrix A]] [vector Z] — [vector B—AZ] 

{{matrix B]] [[matrix A]] [[matrix Z]] —  [[matrix B—AZ]] 


MATE ROW RSF G Command 























































RSWP 
Row swap 

[{matrix]] index; index —> 
R-B BASE R+6 
Real-to-binary conversion 





{{matrix]]’ 












n —> #n 












Related Flags: —5 through —12 
RC CAPL Bec 
TYFE Rec 
Real-to-complex conversion 
xy > (%y) 
[R-array;eai] [R-arrayimag] — [C-array] 
RD REAL BoD 
Radians-to-degrees conversion 
x — (180/m)x 
‘symb’ — ‘R-D(symb)’ 





















{ } Function 






Related Flag: -3 
SAME TEST SANE 
Tests two objects for equality 

obj; obj —> T/F 
SBRK (4) SERIA SEEK Command 


Sends serial break 











Command 









Related Flag: —33 
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SCALE (4) (PLOT) FFAF SCALE 
Specifies x and y scale in units per 10 pixels 
xy > 
SCATRPLOT {4} FLOT SCATE 
Draws a scatter plot of the data in YDAT 
SCATTER (4) STAT FTYFE SCATT Command 
Selects scatter plot 
SCHUR MATE FACTRE SCHUF  G{}Command 
Computes the Schur decomposition of a square matrix 
[{matrix A]] — [[matrix Q]] [[matrix T]] 
SCI (9) FMT SCI 
Sets Scientific display mode 
n- 
SCONJ (4) ARITH SCOH Command 
Conjugates the contents of a variable (see CONJ) 
‘name’ — 
SDEV (4) IVAR SOEV Command 
Computes sample standard deviations of the data in YDAT 
> x 
=> [xX] Xo. Xa] 
SEND (4) (70) SEHE 
Sends object to another Kermit device 
‘local-name 
{ { local-name remote-name } } 
{ local-name, local-name) .. 
{ { local-name, remote-name } local-nameg .. 
Related Flags: -33, -35, -39 
SEQ LIST PROG SEG > G{ } Command 
Generates list of results from repeated execution of object 
object ‘name’ start end step > { list } 
SERVER [P)P) 
(4) SERVE SERVE 
Selects Kermit Server mode 
Related Flags: —33, -35, —36, -39 
SF TEST SF { } Command 
(4) PEAG = SF 


Sets a system or user flag 


’ 


> 
+ 
Seer 
—_ 


J 
J 





tn +> 
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SHOW (4) (SYMBOLIC) SHOW Command 
Resolves all name references or all name references except those in a 
list 







‘symb; ‘name’ — ‘symby’ 
‘symb,;’ { name; name2...} — ‘symb)’ 
Related Flag: -3 
SIDENS (4q)(EQLIB) UTILS SIGEH G { } Function 
Intrinsic density of silicon as a function of temperature. If no units are 
specified, T is assumed to be in K. 
T — density (1/cm3) 
‘symb’ — ‘SIDENS(symb)’ 



















Related Flag: -3 

SIGN REAL SIGH 
CAMPL SIGH 

Sign of a number. Complex numbers return a unit vector in the 

direction of z 












{ } J Function 











x<0 > -l 
x=0 > 0 
x>0 > 1 
Zj 7 Z2 
x_unit > y 
‘symb’ — ‘SIGN(symb)’ 





Related Flag: -3 
SIN (SIN) 


Sine 





Z sin Z 
‘symb’ “SIN(symb)’ 
Related Flags: -3, -17, -18 
SINH HF SIHH 
Hyperbolic sine 
Z — sinhz 
‘symb’ — ‘SINH(symb)’ 


Related Flag: —3 
SINV (4) (MEMORY) HEITH SIMM { } Command 


Inverts the contents of a variable 
‘name’? —> 
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SIZE (4) SIZE Command 
EIST ELEM SIZ 
GROEB SIZE 
Finds the dimensions of an object 
{ list } 
‘algebraic’ 
“string” 
[vector] 
[[matrix]] 
grob 
PICT 


objects 
objects 
characters 
{ elements } 
{ rows cols } 
#width #height 
#width #height 

unit_object objects 

other 1 

SL BASE BIT 
Shifts left by one bit 


blidddidd 


#ny — #n2 
Related Flags: —5 through —12 


SLB BASE BYTE 


Shifts left by one byte 
#ny — #n2 
Related Flags: -5 through —12 


SLOPEFIELD (4) SC PTYFE G Command 
SLOPE 
Selects slopefield plot 
SNEG (4) (MEMORY) AR ITH SHEG 
Negates the contents of a variable 
‘name’ — 
SNRM MATE HORM SHE G { } Command 
Computes the spectral norm of a matrix 
[{matrix]] — spectral norm 
SOLVEQN {4 EGQLIB SOLVE G Command 
Places Equation Library equation(s) in solver, places corresponding 
picture in PICT if PICT_option is non-zero. For equation numbers, 
see Equation Library Reference. 
subject_number title_number P/JCT_option —> 
Related Flags: 60, 61 
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SORT LIST SORT G Command 
LIST FROG SORT 

Sorts the elements of a list in ascending order. If the list contains a 

series of lists they will be sorted using their first object as the key. 

{list} — { list’ } 

SPHERE (4) AHGL SPHER G Command 
VECTR SPHER 

Sets polar/spherical mode 

sQ (a) &) 

Squares a number or matrix 


Z 22 


[{matrix]] [{matrix * matrix]] 
‘symb’ ‘SQ(symb)’ 
X_unit x2_unit2 


Related Flag: -3 
SR BASE 
Shifts right by one bit 
#ny —> #n2 
Related Flags: —5 through —12 
SRAD NATE HORM SRA G { } Command 
Computes the spectral radius of a square matrix 
{{matrix A]] —  spectral_radius 
SRB BASE BYTE SRE 
Shifts right by one byte 
#ny — #n2 
Related Flags: —5 through —12 
SRECV (4) SERIA SRECY Command 
Reads n characters from the I/O port, time-limited by the timeout 
specified by the command STIME. T/F is 1 for successful receive. 
n — “string” T/F 
Related Flag: -33 
START BROH START START 
Begins START ... NEXT or START ... STEP 
start end START loop-clause NEXT 
start end START loop-clause increment STEP 
STD (4) FHT STD Command 
Sets Standard display mode 
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STEP BRCH START STEP 
BEECH FOR STEP 
Ends FOR ... STEP or START ... STEP 
increment —> 
STEQ (6) (a) Et Command 
(q)(PLOT)(NXT) 2b (4) En 
Stores into reserved variable EQ 
object > 
STIME (4) SERIA STIME Command 
Sets serial transmit/receive timeout. The valid range is 0 to 25.4 
seconds. 0 means there is no time limit. The default timeout is 10 
seconds. 
seconds —> 
STO STO { } Command 
Stores an object into a variable 
obj ‘name’ 
obj :port:name 
obj name(position) 
grob PICT 
backup port 
library port 
STOALARM ([4) ALRM STOAL Command 
Stores alarm in system alarm list. Repeat interval is specified in ticks 
(8192 per second). 


era 
era 
Sara 
~ 
yS 
> 


time — alarm_number 
{ date }} — alarm_number 
{ date time } — alarm_number 
{ date time action } — alarm_number 
{ date time action repeat } — alarm_number 
Related Flags: -42, -43, -44 
STOF (4) FLAG STOF Command 
Sets the system flags or the system and user flags according to the 
value of two binary integers in a list 
#system —> 
{ #system #user} —> 
Related Flags: —5 through —10 
Note: The wordsize should be set to 64 bits 
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STOKEYS (4) EEYS STOE Command 
Makes multiple user-key assignments. Including S activates standard 
key definitions. Including SKEY restores standard key assignment. 
S-7> 
{ SKEY rep} -> 
{ obj, repy ... Objp rc-pp} 
{ S objy rep, ... objyp rce.pp} 
Related Flags: -61, -62 
STO+ (a) ARITH 
Storage addition (see +) 
object ‘name’ —> 
‘name’ object — 
STO- (4) ARITH 
Storage subtraction (see —) 
object ‘name’ —> 
‘name’ object > 
STO* (4) ARITH 
Storage multiplication (see *) 
object ‘name’ —> 
‘name’ object —> 
STO/ (4) ARITH 
Storage division (see /) 
object ‘name’ — 
‘name’ object —> 
STO> (4) CATA {—) STOE Command 
Stores into reserved variable SDAT 
object > 
STR-> Command 
Evaluates the commands defined by a string after removing the “ “ 
delimiters 























{ } Command 















{ } Command 



















{ } Command 














{ } Command 






“string”? > 
©) +5TR 
TYPE SS7R 
Converts an object to a string 

object — “string” 
Related Flags: —5 through —12, -49, -50 





Command 





—STR 
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STREAM LIST PROC SIREA G Command 
Executes object using first two objects in list, then executes object 
using third object in list and the previous result until list is exhausted 
{ list } object — object 
STWS BASE STMS 
Sets the binary integer wordsize 
n- 
#n > 

Related Flags: —5 through —-12 
SUB (—) (CHARS) SUE 

LIST ELEM SUB 

GEOB SUB 
Extracts a portion of a list, string, or grob 

{ list } start end — { sublist } 
“string” start end “substring” 
grob (x1,y1) (X22) subgrob 
grob { #x, #y; } { #x2 #y2 } subgrob 
PICT (X1,¥1) (X2,y2) subgrob 
PICT { #x, #y, } { #x2 #y2 } subgrob 

SVD MATE FACTR SVo G { } Command 
Computes the singular value decomposition of a matrix 

{{matrix A]] —  [[matrix U]] [[matrix V]] [vector S] 
SVL MATE FACTR SL G { } Command 
Computes the singular values of a matrix 

{{matrix A]] — [vector S] 


SWAP (4) Command 
Swaps the objects in levels 1 and 2 

objy obj; — obj, obj 
SYSEVAL Command 
Executes a system object at the specified address 

#n_ > 

TAG TYFE TAG { } Command 
Tags an object with another object 

obj “tag” —  :tag:obj 

obj ‘name’ — :name:obj 
obj x — :x:obj 
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TAIL (4) (CHARS) (NXT) TAIL G Command 
LIST. ELEM TAIL 

Returns a list less its first object or a string less its first character 
{ objy obj... obj,p } > { obj2... obj, } 


“ABCDE” — “BCDE” 















TAN 
Tangent 





Zz — tanz 
‘symb’ — ‘“TAN(symb)’ 
Related Flags: —3, -17, -18, —22 
TANH HVE TAHH 
Hyperbolic tangent 



















z — tanhz 
‘symb’ — ‘“TANH(symb)’ 





Related Flag: -3 
TAYLR' (4) TAYLE 
Computes a Taylor series approximation 
‘symb,’ ‘global’ degree — ‘symby’ 
TDELTA (4)(EQLIB) UTILS TEELT 
Calculates temperature difference 
T; T2 — difference 
‘symb’ x — ‘TDELTA(symb,x)’ 
x ‘symb’ — ‘“TDELTA(x,symb)’ 

‘symb;’ ‘symb2’ — ‘TDELTA(symb),symb2)’ 
Related Flag: -3 
Note: Values returned by TDELTA have level 2 units 
TEACH G Command 
Creates examples directory in the VAR menu 
TEXT OUT TEST 
Selects the stack display 
THEN BECH IF THEH 

ERCH CASE THEH 
ERROR IFERR THEH 

Begins true-clause of IF, CASE, or IFERR structures 
TIF > 









Command 















G Function 




















Command 
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TICKS (4) TICES Command 
Returns time in binary integer clock ticks (8192 per second) 
—> #n 
TIME (6) TIME Command 
Returns current time as number in 24-hour format 
— HH.MMSSs 
—3TIME {4) +TIM Command 
Sets the system time using 24-hour format 
HH.MMSSs_ —-> 
TINC (a) UTILS TIHE G Function 
Adds temperature increment 
T, increment > T) 
‘symb’ x — ‘TINC(symb,x)’ 
x ‘symb’ — ‘TINC(x,symb)’ 
‘symb,’ ‘symb2’ — ‘“TINC(symb,,symb2)’ 
Related Flag: —3 
Note: Values returned by TINC have level 2 units 
TLINE FICT TLIWE Command 
Toggles pixels on a straight line 
(xpy1) (X2y2) > 
{ #x1 #y1 } { #x2 #y2 } > 
TMENU (4) MEHU TMEH Command 
Displays temporary built-in or list-defined menu (see Built-in Menus) 
mm.pp —> 
‘list-name’ —> 
{ names and commands} —> 
Note: TMENU does not affect the contents of the variable CST 
TOT (4) WAR TOT Command 
Sums the columns in XDAT 
> x 
> [x1 X2...Xm] 
TRACE MATE HORM TEACE  G{ } Command 
Computes the trace (sum of diagonal elements) of a square matrix 
[{matrix]] — trace 
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TRANSIO (4) IOFAR TRAH 


Selects character translation mode for I/O 


n- 


TRN MATE fl 


Transposes a matrix 


No translation 

CR to CR/LF (default) 
Chars 128-159 

Chars 128-255 


TRH { } Command 


[[matrix,;]] — [[matrix]] 


‘name’ 


TRNC 


REAL TRHE 


{ } Function 


Truncates a number to n decimal places if 0 <n < 11, ton significant 
digits if -11 <n <-1, or to the current display format if n=12 


Zj n 

z ‘symb’ 
‘symb’ x 
‘symb,’ ‘symby’ 
X_unit n 


X_unit ‘symb’ 
[vector;] n 
[{matrix,]] 


Related Flag: -3 


TRUTH (4)(PLOT) FTV FE TRUTH 


Selects truth plot 


TSTR (4) (TIME) (NXT) (NXT) TESTE 





Z2 

‘TRNC(z,symb)’ 
“TRNC(symb,x)’ 
“‘TRNC(symb,,symb ) 
x’_unit 
‘TRNC(x_unit,symb)’ 
[vector] 

{[matrix]] 


Command 


{ } Command 


Converts date and time numbers to string form 
date time — “string” 


Related Flags: -41, -42 
TVARS (4) CIE 


ITVARS 


{ } Command 


Lists the variables of specified type found in the current directory 


(see Object Types) 


type — {names } 


TVM 
Displays the TVM menu 


TVMBEG 
Sets Begin payment mode 


322 


G Command 


G Command 
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TVMEND G Command 
Sets End payment mode 
TVMROOT {4) T¥A TVAR G Command 
Solves for TVM variable using the other TVM variables 
‘name’ — value 
Related Flag: -14 
TYPE TEST TYEE 
TYPE TYRE 
Returns the type of an object (see Object Types) 
object — type 
UBASE (4) (UNITS) EASE { } Function 
Converts unit object to SI base units 
x > xX 
X_units — y_base-units 
‘symb’ — ‘UBASE(symb)’ 
Related Flag: -3 
UFACT = (4) (UNITS) LIFACT { } Command 
Factors specified compound unit 
x y_units > x 
X_units; y_units) — x’_units2 * units3 
— UNIT TYPE #UHIT { } Command 
(J UNIT 
Combines a number and unit object to create a new unit object 
xX y_units — x_units 
UNTIL BROCH 80 UNTIL 
Begins test-clause of DO ... UNTIL ... END 
UPDIR_ = (4) Command 
Makes parent directory the current directory 
UTPC FROE UTPEC 
Upper-tail Chi-Square distribution 
d.of. x — utpc(d.o-f.,x) 
UTPF FROE UTEF { } Command 
Upper-tail F-distribution 
d.o.f.; d.o.f.g x — utpf(d.o.f.1, d.o.f.2, x) 
UTPN PROBE UTFH { } Command 
Upper-tail normal distribution 
mean variance x —  utpn(mean, variance, x) 
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UTPT PROE UTET { } Command 
Upper-tail Student’s t-distribution 
d.o.f. x —  utpt(d.o-f.,x) 
UVAL (4) (UNITS) UAL { } Function 
Returns scalar portion of unit object 
x > x 
X_unit > x 
‘symb’ — ‘UVAL(symb)’ 
Related Flag: —3 
—V2 VECTR +e { } Command 
Combines two real numbers into 2D vector or complex number 
xy > [xy] 
xy > [xe¢y] 
xy > (xy) 
xy > (&«y) 
Related Flags: -15, -16, -19 
V3 WECTR #43 
Combines three real numbers into 3D vector 
xyz—- [xyz] 
xyz —- [xdygz] 
xyz—- [xdygézg] 


Related Flags: -15, -16 
Vv WECTR Ya { } Command 
Separates a 2- or 3-element vector. If there are more than 3 elements, 
the current Coordinate System (flags -15 and —16) is ignored. 

[xy] xy 


[x; ye] > xX ye 
[xyz] > xyz 
[XrzyoZ] — Xr yo Z 
[Xrc<YedZg] > X Yo 2g 
(xy) > xy 
(Xpf&y) > X 4yY@ 
[X1X2..-Xn] > Xy X2--Xp 
Related Flags: -15, -16 
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VAR (6) 1VAF WAR Command 
Sample variances of );DAT data in columns specified by COL 


VARS (4) DIR YARS 
Returns list of variables in the current directory 
— {names } 
VERSION G Command 
Returns strings identifying the operating system version & copyright 
— “version” “copyright” 
VTYPE TYFE VEYEE { } Command 
Returns the type of an object in the named variable, or —1 if the 
variable is nonexistent (see Object Types) 
‘name’ — type 
:port:name — _ type 
*W (4) FFAR #hd Command 
Multiplies the horizontal plot scale by specified factor (alters PPAR) 
x > 
WAIT IH WAIT Command 
Pauses program execution or waits for a key 
seconds —> 
0 — rc.p Doesn’t update menu 
-1 ~ re.p Displays current menu 
WHILE BROH WHILE WHILE Command 
Begins WHILE ... REPEAT .. END 
WHILE test-clause REPEAT loop-clause END 
WIREFRAME (4) SO FTYFE G Command 
HIREF 
Selects wireframe plot 
WSLOG Command 
Returns four strings indicating the time, date, and source of the four 
most recent system halts (see System Operations) 
— “string,” “string;” “strings 
Related Flag: -42 
XCOL (4) EPAR SOL Command 
Specifies DAT column as the independent variable 
x-column ~+ 


29 66 


string,” 
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XMIT (4) SERIA &MIT Command 
Sends string through I/O port without Kermit 

“string? — 1 

“string” — “unsent string” 0 


Related Flag: -33 
XOR BASE LOGIC SOR 
TEST HOR 

Logical or binary XOR 

#n, #N2 — #n3 

xy — T/F 
x ‘symb’ — ‘x XOR symb’ 
‘symb’ x — ‘symb XOR x’ 
‘symb,’ ‘symb2’ — ‘symb; XOR symb)’ 
“string,” “string” — “string3” 
Related Flags: -3, -5 through -10 
Note: String arguments must have the same length. 
XPON REAL “POH { } Function 
Returns the exponent of a number 
x > n 
‘symb’ — ‘XPON(symb)’ 
Related Flag: -3 
XRECV =. (4) (0/0) (NXT) #RECY G Command 
Receive an object using Xmodem protocol (binary mode only) 
‘name’ —> 

Related Flag: —33 
XRNG (q) (PLOT) FFAR BRHG 


Specifies x-axis plotting range 





Xmin Xmax_— 
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XROOT (Pj) { } Function 
Returns x" root of y 


y x Vy 


y_unit x Ix 


x y _ unit ! 

y ‘symb’ ‘XROOT(symb,y)’ 

‘symb’ x ‘XROOT(x,symb)’ 

“symb,’ ‘symb)’ ‘XROOT(symb2,symb,)’ 
y_unit ‘symb’ ‘“XROOT(symb,y_unit)’ 
Related Flag: -3 
XSEND_ (4) a oEH G Command 
Sends an object using Xmodem protocol (binary mode only) 
‘name’ —> 

Related Flag: —33 
XVOL (4) SO VPAR EWOL G Command 
Sets the width of the 3D plotting volume 

Xleft Xright — 
XXRNG_ {4} 20 WPAR AARH G Command 
Sets the width of 3D target mapping range for gridmap and parsurface 
plots 

Xmin Xmax_— 
YCOL {4 SPAR YCOL 
Specifies a XDAT column as the dependent variable 

y-column —> 
YRNG Ga FEAR VYRHG Command 
Specifies y-axis plotting range 

Ymin Ymax_— 
YSLICE (4) SO PIYPE ¥SLIC. G Command 
Selects yslice plot 
YVOL (6) SD VPAR YVOL G Command 
Sets the depth of the 3D plotting volume 

Ynear_Yfar_— 
YYRNG {(&) SD VPFAR YVRH G Command 
Sets depth of 3D target mapping range for gridmap and parsurface 
plots 





Ymin_ Ymax_— 
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ZFACTOR (4) UTILS ZFACT G { } Function 
Calculates gas compressibility factor Z 
Tr Pr > Z 
‘symb’ x — ‘ZFACTOR(symb,x)’ 
x ‘symb’ “‘ZFACTOR(x,symb)’ 


aa 
‘symb,’ ‘symb2” — ‘ZFACTOR(symb),symb2)’ 
Related Flag: -3 
ZVOL (4) SG WPAR 2ZYOL GCommand 
Sets the height of the 3D plotting volume 
Ziow Zhigh — 
f 0} Function 


Square root 
zZ-> vz 
x_unit > te unit!!? 
‘symb’ — ‘V(symb)’ 
Related Flags: -1, -3 
J (P) { } 0) Function 


Integral 
lower_limit upper_limit ‘integrand’ ‘name’ — integral 
‘{(lower_limit, upper_limit, integrand, name)’ 

Related Flags: —3, -45 through —50 

Notes: 

1) name is the variable of integration. 

2) Set Numerical Results mode (flag —3) to perform a numerical 
integration on the stack. 

3) The display mode (such as 2 FIX) specifies the accuracy factor for 
numerical integration, and the uncertainty of integration is stored 
in reserved variable JERR 

a) (P) @) { } 0) Function 

Derivative 

‘symb;’ ‘name’ — ‘symby’ Complete 
‘dname(expression)’ Stepwise 
Related Flag: -3 
Note: name is the variable of differentiation 
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1 Ga 0 Function 
Symbolic constant 7 
— 3.14159265359 
> ‘Tv 
Related Flags: —2, -3 
>» Pe) { } O Function 
Summation 
‘summation_index’ initial_value final_value ‘summand’ — sum 
‘*>(summation_index=initial_value,final_value,summand)’ 
Related Flag: -3 
=X (4) SUMS =x 
Sum of data in independent YDAT column 
- YX; 
YXA2 (4) SUMS ERE 
Sum of squares of data in independent YDAT column 
- YX? 
XY (4) SUMS EY Command 
Sum of data in dependent XDAT column 
- XY; 
XY*2 (4) SUNS S72 Command 
Sum of squares of data in dependent YDAT column 
coed YY}? 
=X*Y (4) SUMS EEey Command 
Sum of products of data in independent and dependent XDAT columns 
> YXiY; 
y+ (4) CATA E+ Command 
(—) (PLOT) (NXT) STAT DATA E+ 
Appends one or more data points to DAT 
x > 
[vector] —> 
[[matrix]] —-> 
y- (4) CATA =- Command 
(q) (PLOT) (NXT) STAT CATA =E- 
Deletes last row from SDAT 
> x 
— [vector] 
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< 2EeT 

Less-than comparison 

x<y (T/F) 
T/F 

T/F 

“x<symb’ 
‘symb<x’ 
“x_unit<symb’ 
“symb<x_unit’ 
‘symb,;<symb)’ 
T/F 

T/F 

T/F 


xy 
“string,” “string,” 
X_unit; y_unit, 
x “symb’ 
‘symb’ x 
X_unit ‘symb’ 
‘symb’ x_unit’ 
‘symb,’ ‘symb)’ 
:tag:object object 
object :tag:object 
object object 
Related Flag: -3 
Notes: 
1) Strings are compared alphabetically 
2) Units must be dimensionally consistent 
3) Tags are dropped before the comparison 
> TEST 


Greater-than comparison 


29 66 


bhbdbdlliull 


x y 

X_unit, y_unit 
x ‘symb’ 

‘symb’ x 

X_unit ‘symb’ 
‘symb’ x_unit’ 
‘symb,’ ‘symb’ 
:tag:object object 
object :tag:object 
object object 


x>y (T/F) 
T/F 


“x>symb’ 
“‘symb>x’ 
*x_unit>symb’ 
‘symb>x_unit’ 
‘symb,>symb)’ 
T/F 

T/F 

T/F 


bhblldiiulld 


Related Flag: -3 

Notes: 

1) Strings are compared alphabetically 

2) Units must be dimensionally consistent 
3) Tags are dropped before the comparison 


{ } Function 


{ } Function 
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< TEST £ { } Function 
Less-than-or-equal comparison 
xy 
“string,” “string,” 
X_unit; y_unit) 
x ‘symb’ 
‘symb’ x 
X_unit ‘symb’ 
‘symb’ x_unit’ 
‘symb,’ ‘symby’ 
:tag:object object 
object :tag:object 
object object 
Related Flag: -3 
Notes: 
1) Strings are compared alphabetically 
2) Units must be dimensionally consistent 
3) Tags are dropped before the comparison 
> TEST = { } Function 
Greater-than-or-equal comparison 
x y 
X_unity y_unity 
x ‘symb’ 
‘symb’ x 
x_unit “symb’ 
‘symb’ x_unit’ 
‘symb,’ ‘symb9’ 
:tag:object object 
object :tag:object 
object object 
Related Flag: -3 
Notes: 
1) Strings are compared alphabetically 
2) Units must be dimensionally consistent 
3) Tags are dropped before the comparison 


x<y (T/F) 

T/F 

T/F 

‘x<symb’ 
‘symbsx’ 
*x_unit<symb’ 
‘symbSx_unit’ 
“symb,Ssymby)’ 
T/F 

T/F 

T/F 


9 66 


bheoJldllisd 


x2y (T/F) 
T/F 


“x2symb’ 
‘symb2x’ 
*x_unit2symb’ 
“symb2x_unit’ 
‘symb,2symb)’ 
T/F 

T/F 

T/F 


bhlhlibdlildgd 





Command Reference 331 


# TEST = { } Function 
Not-equal comparison 
x y 
X Z 
zx 
X_unit, y_unit 
x ‘symb’ 
‘symb’ x 
X_unit ‘symb’ 
‘symb’ x_unit’ 
‘symb,’ ‘symb)’ 
:tag:object object 
object :tag:object 
object object 
Related Flag: -3 
Notes: 


“x#symb’ 
“symb#x’ 
*x_unit#symb’ 
“‘symb#x_unit’ 
“symb;#symb)’ 
T/F 

T/F 

T/F 


bllbidbdddblild 


1) Strings are compared alphabetically 

2) Units must be dimensionally consistent 

3) Real-complex comparisons assume the imaginary part is 0 
4) Tags are dropped before the comparison 


= (4) E) { } Function 


Equal operator. Creates an equation from two arguments 


Z1 22 
z ‘symb’ 
‘symb’ z 
xX y_unit 
X_unit y 
xX_unit y_unit 
‘symb’ x_unit 
X_unit ‘symb’ 
‘symb,’ ‘symb’ 
Related Flag: -3 


‘Z1=29' 
‘z=symb’ 
‘symb=z’ 
*x=y_unit’ 
“*x_unit=y’ 
*x_unit=y_unit’ 
“symb=x_unit’ 
*x_unit=symb’ 
‘symb,=symb)’ 


bhbblddbild 
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Logical equality comparison 


x==y (T/F) 
T/F 


T/F 

T/F 

‘x==symb’ 
“symb==x’ 
*x_unit==symb’ 
‘symb==x_unit’ 
‘symb,==symb)’ 


X_unit; y_unit, 
x ‘symb’ 

‘symb’ x 

X_unit ‘symb’ 
‘symb’ x_unit’ 
‘symb,’ ‘symb)’ 
:tag:object object 
object :tag:object 
object object 


blbdbbddbliddd 


Related Flag: -3 
Notes: 
1) Units must be dimensionally consistent 
2) Real-complex comparisons assume the imaginary part is 0 
3) Tags are dropped before the comparison 
> (PIG) Command 
Assigns local variable(s) 
obj; ... obj, 
| (4) (SYMBOLIC) (NXT) | 0 Function 
WHERE function. Substitutes symbolics for names in a symbolic 
expression. 
‘symbyjq’ { name, symb, ...name, symb, }} — ‘symDnpew’ 
z ‘symbgjq’ { name; symb, ...name, symb,} — z 
‘symb,jql(name;=symby, ..., name,=symb,)’ 

Related Flag: —3 
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+ dO Function 
Adds two objects 

Z1 22 

#n m 

n #m 

#n #m 

X_unit y_unit 

“‘symb,’ ‘symb’ 

z ‘symb’ 

‘symb’ z 

‘symb’ x_unit 


Z\+Z2 

#n+m 

#n+m 

#n+m 

X+y_unit 
“symb;+symby’ 
‘z+symb’ 
‘symb+z’ 
“symb+x_unit’ 


[vector,] [vector] 
[{matrix,]] [matrix] 
grob; grob 

“abc” “def” 

“string” object 
object “string” 

{ list } object 

object { list } 

{ obj; obj2 } { obj3 objq } 
Related Flags: —3, -S through -10 
Notes: 

1) Grobs must have the same dimensions 

2) STR is executed on objects added to strings 

3) Units must be dimensionally consistent 

4) For element-wise addition of objects in lists, use ADD 


[vector,+vector?] 
[[matrix,+matrix2] 
grob3 

“abcdef” 
“stringobject” 
“objectstring” 

{ list object } 

{ object list } 

{ obj; Obj obj3 obj, } 


> 
Sera 
Sed 
—- 
— 
Seed 
eed 
» 
- 
X_unit ‘symb’ — ‘x_unit+symb’ 
aed 
> 
Sera 
— 
» 
a> 
Seed 
=> 
—- 
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Subtracts two objects 


Zi Z2 

#n m 

n #m 

#n #m 

X_unit y_unit 

z “‘symb’ 

‘symb’ z 

‘symb,’ ‘symb9’ 

‘symb’ x_unit 

X_unit ‘symb’ 

[vector] [vector2] 

[[matrix;]] [[matrixy] 
Related Flags: -3, -S through —10 


Lab dh ebb bb te 


Z|—-Z2 

#n—m 

#n—m 

#n-—m 

x-y_unit 
‘z-symb’ 
‘symb—-z’ 
“symb,;—symb)’ 
“symb-x_unit’ 
*x_unit-symb’ 
[vector ;—vector] 
[[matrix;—matrix>]] 


Note: Units must be dimensionally consistent 


* 
Multiplies two objects 
Z, Z2 
#n m 
n #m 
#n #m 
[vector] z 
z [vector] 
[[{matrix]] [vector] 
{{matrix,]] [[matrix]] 
z ‘symb’ 
‘symb’ z 
‘symb,’ ‘symb9’ 
xX y_unit 
X_unit y 
X_unit; y_unit 
xX_unit “‘symb’ 
‘symb’ x_unit 
Related Flags: -3, —5 through —10 
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Z1*2Z2 

#n*m 

#n*m 

#n*m 

[vector*z] 
[vector*z] 
{matrix*vector] 
[[matrix*vector]] 
‘z*symb’ 
‘symb*z’ 
‘symb,*symb,’ 
x*y_unit 
x*y_unit 
x#*y_unit;*unit 
“(x_unit)*(symb)’ 
‘(symb)*(x_unit)’ 


o Function 


0 Function 
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/ &) 
(4) (SOLVE) 


Divides two objects 


[vector] z 
[vector] [[matrix]] 
z ‘symb’ 
‘symb’ z 
‘symb,’ ‘symb’ 
xX y_unit 
X_unit y 
X_unity y_unit 
X_unit ‘symb’ 
‘symb’ x_unit 
Related Flags: -3, -5 through —10 
As 
Raises a number to a power 
Z1 Z2 
z ‘symb’ 
‘symb’ z 
‘symb,’ ‘symb)’ 
xX_unit y 
x_unit ‘symb’ 
‘symb’ x_unit’ 
Related Flag: -3 
! PROE 
Factorial or gamma function 
n 
x 
‘symb’ 
Related Flags: —3, —20, -21 
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0 Function 


Z/Z2 

#n/m 

#n/m 

#n/m 

[vector/z] 
[[vector/matrix]] 
‘z/symb’ 
‘symb/z’ 
‘(symb))/(symbz)’ 
x/y_1/unit 
x/y_unit 
x/y_unit,/unitz 
“(x_unit)/(symb)’ 
‘(symb)/(x_unit)’ 


0} Function 


Z%Z2 

‘z\(symb)’ 
“(symb)%z’ 
“(symb,)“(symb2)’ 
x4y_unit4y 
‘(x_unit)(symb)’ 
“(symb)(x_unit)’ 


{ } Function 
n! 


T(x+1) 
‘(symb)!” 
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% REAL 
Percent 
x y 
x ‘symb’ 
“‘symb’ x 
‘symb,’ ‘symb’ 
X_unit y 
X_unit ‘symb’ 
‘symb’ x_unit 
x y_unit 
Related Flag: —3 


%CH REAL 


{ } Function 


xy/100 
“%(x,symb)’ 
“%(symb,x)’ 
“%(symb ,,symb2)’ 
xy/100_unit 
“%(x_unit,symb)’ 
“%(symb,x_unit)’ 
xy/100_unit 


{ } Function 


Percent change from x to y as a percentage of x 


‘symb,’ ‘symb’ 
X_unit y_unit 
X_unit ‘symb’ 
‘symb’ x_unit 
Related Flag: -3 


100(y—x)/x 
“%CH(x,symb)’ 
“%CH(symb,x)’ 
“%CH(symb,,symb2)’ 
100(y—x)/x 
“%CH(x_unit,symb)’ 
“%CH(symb,x_unit)’ 


Note: Units must be dimensionally consistent 


%T REAL 


{ } Function 


Percent total of x that is represented by y 


‘symb,’ ‘symb)’ 
X_unit y_unit 
X_unit ‘symb’ 
‘symb’ x_unit 
Related Flag: -3 


100y/x 
“%T(x,symb)’ 
“%T(symb,x)’ 
“%T(symb,,symb2)’ 
100y/x 
“%T(x_unit,symb)’ 
“%T(symb,x_unit)’ 


Note. Units must be dimensionally consistent 


Command Reference 





337 


338 





Alpha Keyboard 


Loner] (yj fz] oa fe 
etc. Oo # 


LE) 


tf] _ 


Lx] 
= 
T=] 


Alpha Keyboard 


ADDCHR 
ALGSTK 


AMPLT 
ANIM 
BAKDIFF 
BAKER 
BROWNLN 
CHKARGS 
CHOS% 
CHOS1 
CHOS2 
CKKB 
CMP48 
COERCE 
COL82 
CRCE2 
DAT2STR 
DAT2YMD 
DOW 
DSORT 
DSPER 
ENTROPY 
ERCALC 
ERTOR 
ETOR2 
FACTRL 
FREXP 
FUN 

GCD 
GETMSG 
GETVER 
GREX 
INF1 

INF2 
INPLOT 
JDAYN 
JDCAL 
JULIA 


Program Index 


Adds a character object to the end of a string 

Uses -LCD to put an algebraic in the stack display 
Amortization plot 

Demonstrates graphics animation 

Compares iterates of Baker’s function 

Plots Baker’s function 

Draws Brownian line 

Checks stack arguments 

CHOOSE box selects percentage calculations 
CHOOSE example 

CHOOSE example 

Checks the key buffer 

Streamlines a program that uses SYSEVALs 
Converts a real number into an internal binary integer 
Prints graphics pattern on the HP 82240 printer 
Converts two real numbers into internal binary integers 
Converts date to string 

Converts date to year, month, and day numbers 
Finds the day of the week given a date 

Enhanced directory sort 

Displays extended real numbers 

Plots proportion of gases in free expansion example 
Extended real number calculating environment 
Converts an extended real number to a real number 
Converts two extended real numbers to real numbers 
Illustrates recursion 

Graphic illustration of free expansion of gas 
Illustrates use of example program XYGD 

Greatest common divisor 

Gets a message from a built-in message table 

Gets version of operating system and model designation 
Illustrates graphics operations 

INFORM example 

INFORM example 

Plots inequalities 

Converts date to Julian day number 

Converts Julian day number to date 

Plots points on the Julia set 
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LBLPICT Labels PICT with a boxed label 188 


LCLV Illustrates use of — as it stores local variables 43 
LCM Least common multiple 81 
LINES DISP example 67 
LOGB Log to an arbitrary base using extended real numbers 162 
LREV Reverses a list using meta-object programs 78 
LSTSTR Searches a string backwards from given position 155 
MAH Adds an object to the head of a meta-object 75 
MAH2 Adds an object to the head of a meta-object in pos 2 715 
MAM2 Concatenates two meta-objects 76 
MANDEL Draws the Mandelbrot set 138 
MAT Adds an object to the tail of a meta-object 75 
MAT2 Adds an object to the tail of a meta-object in pos 2 75 
MAVG DOSUBS example — computes moving average 72 
MDH Extracts object from the head of a meta-object 76 
MDH2 Extracts object from the head of a meta-ob in pos 2 76 
MDT Extracts object from the tail of a meta-object 76 
MDT2 Extracts object from the tail of a meta-ob in pos 2 76 
MENUEX Custom menu example 229 
MKBOX Creates a blank grob with a border 186 
MKERTOA _ Creates the program ERTOA 164 
ML2M Converts two lists into meta-objects 77 
MM2L Converts two meta-objects into lists 77 
MNU% Custom menu of percentage calculations 107 
MSGBX Displays message box with graphic icon 199 
MSWAP Exchanges two meta-objects 77 
MZ2 Places empty meta-object in position 2 77 
NXTSTR Searches string at specified starting position 154 
ORBIT Plots chaotic orbits 128 
ORDXY Orders points for internal line drawing objects 189 
PARSE Parses a string 156 
PASCAL Displays Pascal’s triangle 112 
PFIT Polynomial curve fit 83 
PRMCNT Illustrates use of PROMPT with a custom menu 59 
QRT1 Local variable example 1 44 
QRT2 Local variable example 2 45 
QRT3 Subprogram example 1 46 
QRT4 Subprogram example 2 47 
QRT5 Subprogram example 3 47 
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RANWALK 
RTOE2 
RTOER 
SFILT 
SHWBX 
SHWP 
SLOPE 
SPACES 
SQPQ 
STKV 
SUBR 
TANK 
TOCHR 
TOTXT 
TRAIN 
TREE 
TRPCN 
TRYMBX 
TVMCALC 
TXTBX 
TXTEX 
UCRC2 
UDFUI 
UNCOERCE 
VSCAN 
WCM 
XYGD 
YMD2DAT 


Brownian motion in two dimensions 

Converts two real numbers to extended real numbers 
Converts a real number to an extended real number 
Filters a list using meta-object programs 

Places box with border in the stack display 
Polynomial fit with graphic view 

INFORM example application — calculates line slope 
Creates a string of spaces 

Square root’s partial quotients 

Displays up to ten levels of the stack 

Subroutine example 

Tank battle on the status line 

Creates a character object given a real number 
Completely clears the stack display 

Steam train crossing the status line 

Draws a fractal tree 

Shows how to trap 

Illustrates use of example program MSGBX 
Customized solver example implements TVM equation 
Places text in a graphics box 

Illustrates object to graphics conversions 

Converts two internal binary integers into real numbers 
Creates INFORM interface for user-defined functions 
Converts an internal binary integer into a real number 
Scan input vector using meta-object programs 
Illustrates WAIT with a custom menu 

Places a graphics object in the stack display 

Converts year, month, and day numbers to date 
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HP 48 Handbook Disk 


Armstrong Publishing Company offers a disk containing all the named 
example programs in The HP 48 Handbook. If you have access to an 
IBM-compatible or Macintosh personal computer, you can transfer 
these programs to your HP 48G/GX using the wired serial port, saving 
time and avoiding potential keystroke errors. See the next page for 
ordering information. 


The HP 48 Pocket Book 


The HP 48 Pocket Book goes where you go — providing a concise 
collection of handy tables covering many aspects of HP 48 operations 
and a 32 page abbreviated command reference. At 3.5” X 6.375” and 
56 pages, The HP 48 Pocket Book is small enough to live in your purse 
or backpack. See the next page for ordering information. 


The HP 48 File Manager 


The HP 48 File Manager has been designed to simplify data transfer to 
or from an IBM or IBM-compatible computer. 


< HOME } 
—__i_ i BATT 
za 


| FE | CST 
Pee astho | oo TK | IOPAR 





EC Ba I ee ee 


The arrow keys, (ENTER), (4) (UP), and (p) traverse the directory 
structure of either the HP 48 or the server disk. Menu keys may be 
used to show the directory of the Kermit server’s disk, transfer files, 
purge or rename files, create directories, show available free space, or 
archive the memory of the HP 48. The HP 48 File Manager is 
distributed on a disk for IBM-compatible computers, and includes a 
free copy of the latest version of Kermit. You'll need a serial cable to 
connect the HP 48 and the computer (see Data Transfer). See the next 
page for ordering information. 


A Modern Difference Engine 


Nineteenth century inventor Charles Babbage (1791-1871) is famous 
for his designs of large mechanical calculating machines — the 
Difference Engines and the Analytical Engine. The Difference Engines 
were designed to subtabulate and print tables of polynomial 
approximations to log, trig, and other functions. 


In 1991 the Science Museum in London completed construction of 
Difference Engine No. 2 — a modern realization of one of Charles 
Babbage’s never-fulfilled designs. The machine weighs 3 tons and has 
4000 parts. Inspired by this machine, software simulators for the HP 48 
and PCs have been written to provide you with a chance to experiment 
with problems that could be put to the Engine. A Modern Difference 
Engine explains the history and designs of these machines, and 
provides instructions and examples for operation of the simulators. 


Ordering Information 









Qty Title Price 
HP 48 Handbook Disk (IBM) $8 



















HP 48 Handbook Disk (Macintosh) $8 
The HP 48 Pocket Book $7 
HP 48 File Manager (IBM only) $16 











A Modern Difference Engine (IBM only) $20 | 
Shipping: Add $2.00 for each item: | 
Total 











Armstrong Publishing Company 
1050 Springhill Drive 
Albany OR 97321 USA 


Checks should be payable to Armstrong Publishing Company. Orders 
originating outside the United States must be paid in U.S. dollars with a 
check drawn on a U.S. bank or paid with an international postal money 
order. Do not send checks drawn on non-U.S. banks. 


The HP 48 Handbook 


Do you want to know more about your HP 48? The HP 48 Handbook 
is the ultimate reference for people who want to get the most from the 
HP 48 calculator. The HP 48 Handbook discusses fundamental 
concepts, programming techniques, user interface tools, graphics, data 
transfer, and memory management. Additional reference tables cover 
the equation library, constants, keys, menus, units, and much more. 


Over 100 example programs are included to demonstrate various 
programming and graphics techniques. These programs are designed to 
show the HP 48 at its best — illustrating everything from financial 
calculations to fractals to polynomial curve-fitting. 


The Command Reference lists complete stack diagrams, keystroke 
access, characteristics, and related flags for every command. 


Do you want to use the internal operating system that HP doesn’t tell 
you about? Place graphics in the stack display? Perhaps work with 
extended precision real numbers? Maintain total control over the 
keyboard? The System Programming chapter introduces the magical 
world of internal unnamed objects accessible with SYSEVAL. 


Join the thousands of satisfied programmers who depend on The HP 48 
Handbook to get the most from their calculator! 
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